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-I f| UMA INTRODUgAO 
XU AOS SISTEMAS 
OPERACIONAIS — Este 

artigo He Milton de A. Bezerra 
e Luiz Antonio B. Rodrigues 
inicia uma serie de outros 
sobre o assunto, nas paginas 
14, 28, 30, 36, 40, 46, 92, 96 e 
114. 
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^O TABELA DE FORMAS 

— Vetores plotantes e nao 
plotantes geram figuras que 
podem ser ampliadas, 
reduzidas ou girar em torno 
de urn eixo. Artigo de Evandro 
M. de Oliveira para a linha 
Apple. 
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1 OA AS INSTRUCOES 
LjLt± SECRETAS DO Z-80 
— Ha muitas instrucoes que o 
microprocessador Z-80 
executa, mas que o fabricante 
nao divulga. Veja quais sao, 
neste artigo de Jorge Mendes. 



1 Zin A PROGRAMAgAO 
lr±\9 DE JOGOS — Os 

usuanos falam da importancia 
dos jogos e da dificuldade de 
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Complementando, uma 
descricao dos mais vendidos e 
uma rela^ao de livros sobre o 
assunto. 
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• Uma cnse taz milagres. E certo que mi- 
lagres tambem tazem cnse, porem, no 
momento, a hora e de participar e traba- 
lhar no sentido de fazer com que os mo- 
mentos dificeis pelos quais passamos nos 
deixem resultados posmvos. 

No que se refere ao mercado da mi- 
cromformatica. isto podera ate acontecer. 
Este mercado, que ate agora vinha se de- 
senvolvendo de forma bastante contusa, 
esta se alterando aos poucos. 

• E sentido por todos que a cnse global 
que vivemos reduziu severamente, entre 
outras coisas, as possibilidades de acesso 
da classe media ao consumo dito nao ba- 
sico. Um forte golpe no alvo central do 
Marketing dos fabncantes de microcom- 
putadores. 

Era a ela que se dmgiam as chama- 
das. A soiucao para seus problemas ", 
O comprador em potencial sentia coceiras 
no bolso. "A Revoiucao Tecnoldgica. Te- 
nho que ter um micro. Nao posso ticar 
para tras". E ao efetivar a compra, ele po- 
dia relevar tudo, tamanha sua ansiedade: 
um mau atendimento na lo/a; um servigo 
de assistencia tecnica ineficiente; a falta 
de software bom e barato. 

• Afumlou-se o mercado, a competigao 
fica mais acirrada. Paralelamente o perfil 
do consumidor e outro. Ele /a tern mais 
conhecimento e seus cntenos de seiecao 
sao agora mats rigorosos. Cabe aos fabn- 
cantes e prestadores de servigo da Area 
desenvolver novas formas de apresenta- 
gao de seus produtos. 

• Este mes temos uma excelente oportu- 
mdade de constatar como as empresas da 



area estao se preparando para este novo 
perfil de mercado. 

Realiza-se, do dia 17 ao 24, no Par que 
Anhembi, em Sao Paulo, o XVI Congresso 
Nacional de Informatica, ocasiao apropna- 
da para que os mteressados discutam 
exaustivamente os novos rumos da micro- 
informatica em nosso pais. Paralelamente 
ao Congresso, temos a realizagao da III 
Feira Internacional de Informatica, uma 
ampla mostra dos produtos que vem sen- 
do desenvolvidos, alguns cercados de 
grande misteno peias empresas . . . Vamos 
esperar que estes mistenosos langamen- 
tos nao se limitem a copiar equipamentos 
estrangeiros. Vamos torcer para que eles 
se/am um reflexo da cnatividade de um 
povo que nao pode (e nem deve) dar-se ao 
luxo de re-mventar a rooa, 

A exposigao destes produtos e fator 
importante. Para se conseguir uma parce- 
la de tempo das miihares de pessoas que 
visitam os miihares de estandes, e preciso 
haver aigum apeio. Este e normalmente 
visual, porque computaoores desiigados, 
salvo se possuirem marcantes movagoes 
de design, tern todos a mesma cara'. O 
que esta na tela, eis a questao. Questao 
esta que nos aponta um dos problemas 
mais graves de nosso mercado. SOFTWARE. 
• Ate entao os apelos eram os /ogos 
Colondos, sononzados, uma maravilha. 
Num pnmeiro momento. os /ogos eram, 
eles mesmos, produtos-tim. Devidamente 
traduzidos, ou nao, muitos deles eram ven- 
didos a pregos ate um tanto salgados , se 
pensarmos em termos de custo de de- 



senvolvimento . Ho/e a situagao e outra: 
muito mais encarados como produtos-meio 
(de compra), eies ja sao oterecidos por 
aigumas lo/as gratuitamente, para motivar 
a compra do equipamento. Mas afinal, 
compra-se, hoje, um micro so para jogar? 

E valido comprar um sistema de Cr$ 2 
milhoes e ter como demonstratives apenas 
/ogos? Qual a apiicagao de um equipa- 
mento deste tipo? E as aplicagoes senas ? 
Sao senas? Como pensar num programa 
de Contabilidade que nao de os sub-totais? 

O mercado ja esta mudando, e esta na 
hora de todos nos levantarmos a questao: 
o que as pessoas reaimente querem? De 
que eias precisam? Quern pooe responder 
& o visnante oa Feira, o comprador, o 
leitor. 

• MiCRO SISTEMAS, entranoo agora em 
seu terceiro ano, pretende cada vez mats 
abnr espagos para que voce deixe o mer- 
cado saber O QUE VOCE ESPERA. 
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A Elebra Informatica 
vem trabalhando na criacao 
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fabricantes e usuarios de 
compuiadores. 

Atraves de vultosos 



investimentos em pesquisa 
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Informatica em pouco mais 
de 3 anos e a maior empresa 
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perifericos. 
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continua a crescer gerando 
novas tecnologias e lancando 
novos produtos, sempre 
eficientes e confiaveis, que 
estarao integrando 
computadores brasileiros 
em todo o territ6rio 
nacional. 
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O sorteado deste mes, que receberS 
uma assinatura de um ano de MICRO 
SISTEMAS, 6 Francisco Alberto F. da 
Silva, do Rio de Janeiro. 
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Encontrei um erro publicado na 
edicSo n9 23 de MS. erro 6 na pagi- 
na 50, no programa do Sistema Opera- 
tional para o jogo "Aventuras na Sel- 
va", da se>ie Adventures. A linha 55 
saiu assim: 55 < IF C LEN U$ THEN 
GOTO 51 .Gostaria que revissem o arti- 
go para ver se houve erro na impressSo, 
ou entrar em contato com o autor, ca- 
so o erro tenha sido na programacao. 
Ricardo S. A. Vasconcelos 
Campinas-SP 

Voce tern toda a razao, Ricardo. A 
linha 55 saiu com a impressao errada. 
O correto e: 55 IF C < LEN US 
THEN GOTO 51. Aproveitamos para 
Ihe avisar que a linha 420 nao foi im- 
pressa na listagem publicada. Anote ai: 
420 IF NOTE CODE B$(2) THEN 
GOTO 56. Aproveitamos ainda para 
Ihe dizer, e aos outros leitores que ti- 
verem dificuldade neste programa, que 
so existem estes erros no programa, 
mas que ele exige muita atencao na ho- 
ra de digitar. Se voce, ou mais leitores, 
tiverem alguma duvida, 6 so explicar 
detalhadamente o que ocorreu para 
que o autor possa identificar qual o 
erro de digitacao.OK? 



(^ A FUNQAO USR(X) J 



Gostei muito de toda a revista e 
seus programas (...). Testei em meu 
CP-500 os programas da reportagem 
"A Funcao USR(X) no D-8000", ob- 
tendo sucesso com as listagens 1 e 2. 
Entretanto a listagem 3 nSo deu o re- 
sultado esperado, ou seja, rodou nor- 
malmente mas nao produziu os sons 
esperados. AI ids, nenhum som, apesar 
da ligacao correta ao amplificador. 
Gostaria de saber o porque. 
Ari Morato 
Ipatinga-MG 

Enviamos suas indagacdes para o 
autor do artigo, Ivo D'Aquino Neto, e 
este nos respondeu o seguinte: 



O Artigo a "Funcao USR(X) no 
D-8000" foi escrito basicamente para 
completar o manual fornecido pela 
Dismac, que 6 extremamente incom- 
plete, nSo apresentando todas as fun- 
coes disport I've is no D-8000, dentre 
elasa funcao USR. 

Esse artigo, entretanto, 6 valido pa- 
ra equipamentos compati'veis com o 
TRS-80 modelos I e III, ou seja, DGT- 
100, CP-500, Naja etc. Com relacao 
aos programas ilustrativos, devo expli- 
car que foram desenvolvidos especifi 
camente para o D-8000. Isto quer di- 
zer que em outros equipamentos po- 
dem apresentar problemas devido a di- 
ferentes frequencias de clock, ou de 
mapas de mem6ria . 

Contudo, pretendo procurar a Mi- 
crodados, representante da Proldgica 
em Florianopolis, onde tentarei verifi- 
car o motivo que impede o funciona- 
mento do programa da listagem 3 em 
equipamentos CP-500. Por enquanto e 
so. 

Ivo D'Aquino Neto 
Florianopolis-SC 



(^ NUMEROS ALEATORIOSj 



Gostaria de sugerir a publicacao de 
um artigo que resolva um problema 
que atormenta a mim e a amigos pro- 
prietaries da calculadora HP-41C: a 
falta de uma funcao quegere numeros 
aleatorios. Como sabemos, existe gran- 
de dificuldade para gerarem-se nume- 
ros aleat6rios (ou quase aleat6rios, 
com pequena correlacao) para a logica 
eletronica. Essa funcao, extremamente 
util para a programacao e pesquisa ran- 
domica, encontra-se, por^m, em diver- 
sas calculadoras Texas. 

Como sugestSo, acred ito que a me- 
Ihor forma de INPUT desse progra- 
ma seria armazenar o primeiro e ulti- 
mo numeros do intervalo do qual se 
deseja o numero aleatorio a ser usado, 
cada um em um registrador. Armaze- 
nar o numero de casas decimais do nu- 
mero aleatbrio a ser gerado em outro 
registrador. 

Executar a funcao (cujo programa 
associado estou pedindo). Essa forma 
de INPUT permitiria diminuir pro- 
gressivamente a grade de pesquisa (em 
caso de problemas de otimizacao nao 
linear, por exemplo) de maneira a au- 
mentar a precisSo da resposta. 
D^cio Decaro 
Barueri-SP 

Vamos esperar, Decio, que alguem, 
lendo sua carta, tenha uma kteia sob re 
como revolver este problema. 
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Num escarapate de venda de jornais 
encontrei a revista MICRO SISTEMAS, 
cuja leitura apreciei, possuidor que sou 
de um "computador de algibeira" 
Sharp PC 1 500 e de um sistema de mi- 
crocomputador muito divulgado. Te- 
nho grande interesse no assunto, so- 
bretudo a um ni'vel avancado, dada a 
minha formacao academica: licenciado 
em Matem^tica e Engenheiro Geografo. 
Jos6 Lourenco 
Lisboa -Portugal 



Queiram aceitar meus paraWns pelo 
alto ni'vel dos artigos publicados em 
MICRO SISTEMAS e pela excelente 
oportunidade que esta revista vem pro- 
porcionando aos envolvidos na "infor- 
m^tica", ao transmitirem dados t§o 
importantes relacionados a novos lan- 
camentos e programas. 
Edyla M. de Carvalho 
Riode Janeiro-RJ 



Agradeco a esta revista pela nota 
dada com relacao ao nosso novo ende- 
reco. Gostarfarnos, contudo, de retifi- 
car nossos telefones: (011) 257-6118/ 
259-1503, SP. 
Jose' Saad 
Livraria Sistema Ltda. 



Gostaria de deixar caracterizado em 
poucas palavras a atualidade, bom 
gosto e grande fndice informativo 
da revista MICRO SISTEMAS, que 
reflete bem a capacidade desta equipe. 
Francisco Alberto F. da Silva 
Rio de Janeiro-RJ 



( ^ELETRONICA NA HP-41(P ) 



Bom o programa apresentado pelo 
Engenheiro Pedro Ricardo Drumond 
(MS n9 22). Seria pr^tico que fossem 
feitas as seguintes modificacdes: 

01 LBL "Eletron" 

02 

03 Enter 

04 STO 01 

05 STO 02 

06 STO 03 

07 STO 04 

Dessa forma n3o seria necessa>io 
zerar os registros 01, 02, 03 e 04 via 
teclado, antes de entrar com novos da- 
dos (o que nao 6 explicado com clare- 
za no artigo). 
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Numa sequeYicia de calculo XEQ 
Alfa ELETRON Alfa pode ser substi- 
tui'do por GTO .001 e R/S; 

programa alterado usa 29 regis- 
tros dos 63 existentes na HP-41C, nao 
necessitando de mddulos adicionais. 
Nelson M. da Silva 
Rio de Janeiro-RJ 

A i esta sua contribuicao Nelson. 
Por que voce nao aproverta e manda 
colaboracoes suas para a gente? 
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Quero iniciar parabenizando a revis- 
ta pelo seu contfnuo progresso. Houve, 
sem duvida, uma melhora tanto nos as- 
suntos abordados como na pr6pria 
qualidade da re vista em si. Se houve 
progresso isto se deu, entre diversas 
outras coisas, pela contmua contribui- 
cao dos leitores, relevando, sempre que 
possi'vel, pontos posit ivos e negativos. 

As vezes, por6m, alguns se despem 
da razoabilidade e, mesmo que genui- 
namente sinceros, passam a fazer acu- 
sacoes infundadas. 

Foi o caso de Getulio Zepelin e 
Joao Lamorata em sua carta no n9 23. 
Reconheco, por exemplo, que a Micro- 
digital infelizmente desconsiderou uma 
minoria competente por n§o criar um 
teclado de alta velocidade. Mas por 
que culpar a MS, uma vez que isso fora 
confessado pela prdpria boca de um 
representante da Microdigital? Achei 
tamWm um erro flagrante qualificar 
equipamentos sofisticados (como a 
HP-41C, por exemplo) como meros 
"calculadores de bolso". 

Quanto ao volume de publicidade 
na revista, nao ha* porque exigir que a 
MS seja diferente, uma vez que isto 6 
comum a "todas" as outras revistas, 
sejam de informa'tica ou n§o, sejam 
brasileiras ou nao (acho, inclusive, 
que isto ajuda a revista a n3o se tor- 
nar mais cara). 

Esta revista e* poderosa por seu teor 
didatico (aprendi BASIC por meio de- 
la), e mesmo que programas como 
"Previsao da data de parto provSvel 
para bovinos" nao sejam de proveito 
algum para mim, acredito que a I6gica 
em si, ou a forma em que estes progra- 
mas s3o escritos, ajudam no progresso 
da arte de programar. 

£ claro que, como os leitores Ge- 
tulio e Jo3o, eu gostaria de que tudo o 
que e publicado na MS fosse plena- 
mente compatfvel com meu computa- 
dor e que criasse logo em mim um en- 
tusiasmo para pesquisa. Mas acredito 
que vem a ser um comportamento 



muito mais razo^vel, ao inv6s de criti- 
car os programas publicados, contri- 
buir com programas melhores, o que, 
tenho certeza, 6 o que a revista espera 
de n6s, leitores. 
Winston M. Dover 
Rio de Janeiro-RJ 
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Gostaria que fosse publicada algu- 
ma coisa sob re as diferencas entre os 
Sistemas Operacionais do tipo NEW- 
DOS, TRSDOS, DOSPLUS ou mesmo. 
alguns macetes. Esses sistemas -sao uti- 
lizados em TRS-80 ou similares 
(D-8002, CP-500, DGT-100 etc). 
Arthur B. Ferreira 
S3o Paulo-SP 

Voce* tern bola de cristal, Arthur? 
D6 uma olhada neste numero e depois 
nos conte o que voce achou. 
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Gostaria apenas de fazer uma suges- 
tao na parte de palavras te'cnicas usa- 
das em linguagem de computador: se- 
ria possfvel fazer em um dosexempla- 
res da revista a traducao de palavras 
que s3o usadasem Ingle's, por exemplo: 
o que faz o display, perform, accept, 

GOTO etc.? 

Queria saber tambe'm se voce's tern 
a intencao de colocar na revista cur- 
sos de COBOL, Fortran, como estao 
fazendo agora com o curso de Assem- 
bler. 

Paulo Cesar Guedes 
Mari'lia-SP 

Sendo um feliz possuidor de uma 
HP-41CV, venho elogiar os artigosque 
MS editou ate* agora sobre o seu uso. 
Gostei muito do "Curso de Programa- 
ca*o Sinte'tica" e gostaria de dar uma 
sugestao: ja" que a HP n3o publica o 
"Key Notes" no Brasil - o qual ja* 
tive em maos e encontrei "dicas" bas- 
tante interessantes -, que tal a ATI 
tentar entrar em acordo com a HP e 
conseguir publicar period icamente pe- 
quenas (e interessantes) partes do 
"Key Notes" em MS? Seria, creio eu, 
de interesse dos usua>ios das HPs, de 
MS e tambe'm muito da HP que pode- 
ria, quern sabe, ate" aumentar suas ven- 
das. 

Paulo B. Krouwel 
Itajub^-MG 



Gostaria de pedir que os nossos pe- 
quenos fabricantes (bem como osgran- 
des) publiquem ou fornecam, median- 
te pedido, um Manual de Referenda 
de Hardware, a exemplo dos "Hard- 
ware Reference Manual", dos fabri- 
cantes americanos. No Brasil parece 
que so a Digitus tern tal forma de ma- 
nual. 

A impressSo que se tern e" de que 
todos tern medo de mostrar de qual fa- 
bricante americano copiam o hardware 
de seus produtos, ou de serem copia- 
dos por outros concorrentes. Hi um 
caso que, pelos anuncios, parece ate' 
engracado: a Fdnix, a Sayfi e a Janper 
copiaram o LNW americano, e n3o sei 
exatamente quern fez o primeiro, co- 
mo a Unitron com o Apple. 
Enrique H. H. Ferri 
Sao Paulo-SP 

Sugiro que haja maior numero de 
reportagens e artigos ou at6 mesmo 
programas para aparelhos de maior 
porte. Eu, por exemplo, trabalho com 
um LABO 8221 e at* hoje so houve 
um artigo sobre este equipamento pu- 
blicado em MS. 
Andre' Fernandes Esteves 
Santo Andrt-SP 

Gostaria que esta revista abrisse um 
maior espapo para a divulgacao de ma- 
terias ligadas ao impacto social da evo- 
lucSo da informatica. Sendo assim, 
gostaria que esta revista editasse uma 
materia convocando cientistas sociais, 
estudantes, te'cnicas e demais pessoas 
envolvidas para escreverem artigos con- 
cernentes ao problema, enriquecendo, 
desta forma, a qualidade de prestado- 
ra de servicos que MICRO SISTEMAS 
representa. 

Uma outra sugestSo seria uma 
maior divulgacao dos problemas e de- 
feitos observados pela maioria dos 
usuirios e compradores de micros, que 
n§o encontram forum para os recla- 
mos dos desgostos que se defrontam 
com a qualidade de alguns micros e 
respectivos perife'ricos. 
Josd Carlos Silva Cavalcanti 
Rio de Janeiro-RJ 

Desejo sugerir a publicacao de um 
Curso de Linguagem de Maquina para 
o TK82-C, com exemplo de progra- 
mas e seus respectivos codigos. 
Lufs R. Dupont 
Estlncia Velha-RS 



Envie suas sugestoes para MICRO 
SISTEMAS. Elas serao anotadas em 
nossa pauta e procuraremos, na medi- 
da do possi'vel, viabiliz5-las. 
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Apresentamos o mace 
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1.7000 Itautec. O pequeno grande micocomputador. 

Made in Brasil. com nivel internacional. 

Resultado do mais ambicioso projeto realizado por 
tecnicos e engenheiros brasileiros na area da informatica. 

O microcomputador Itautec 1.7000 e pequenininho mas 
faz tudo como gente grande: e compativel com CP/M 
e tern uma grande capacidade de processamento local 
e comunicacao de dados aliadas a caracteristicas de 
modulandade e flexibilidade 1.7000 foi projetado para 



realizar melhor. entre outras. tarefas de: 

• Processamento de textos 

• Planejamentofinanceiro. 

• Entrada de dados. go 

• Substituicao de terminals de video IBM 

• Processamento distribuido. 

Alem disso. o 1.7000 Itautec coloca a sua disposigao 
uma serie de serviqos exclusivos que so mesmo quern 
desenvolveu urn micro desde o seu ini'cio pode oferecer: s 




ocomputador Itautec. 




• Urn centro de atendimento ao usuano com solucao 
~ed»ata para qualquer duvida ou proDi< 

• Um centro de assistencia tecmca pronto para atender 
:occ\ eficiencia em qualquer ponto do terntono nacional 

• Uma documentacao tecmca escnta em portugues 
jro. permanentemente atualizada 

• Um centro educacional com cursos completos onde 
i usuano aprende praticando porque. na pratica. a 
eoriaeoutra 



Coloqueo microcomputaaor I 7000 itautec traoainanao 
ao seu lado. O microcomputador que veio para ficar 

Micro no nome e nas caractensticas Macro nas 
qualidades. 



Complemente o seu TK82-C, TK 85, NE-Z8000 ou CP-200 introduzindo uma sub-rotina 
que perm ita o uso das instrugoes DATA, READ e RESTORE 



DATA, READ e 
RESTORE no TK 



Ronaldo de Almeida Santos 



A "I lgumas vezes encontramos pro- 
gramas interessanti'ssimos, em 
BASIC, mas que na"o sao corn- 
pat fveis com o BASIC dos nossos mi- 
cros. Na maior parte das vezes o proble- 
ma se resume a algumas instrucSes que 
nSo tern exatamente a mesma sintaxe ou 
que funcionam de um modo particular 
em cada equipamento. 

Ha pordm o caso das instrucOes 
READ, DATA e RESTORE que se situa 
num ni'vel diferente, pois os TKs, CPs e 
NEs nao possuem estas instrucoes. En- 
tao, estariamos fadados a nao rodar pro- 
gramas que incorporassem tais instru- 
coes? A resposta i n5o. 

Toda instrucSo, seja ela qual for. na 
realidade nao passa de uma sub-rotina 
do sistema operacional do micro e se o 
equipamento na"o tern uma determinada 
instruca'o € porque n2o hi uma sub-roti- 
na, no sistema operacional, que cumpra 
essa tarefa. Podemos, entao, escrever a 
tal sub-rotina para "complementar" o 
micro e assim dispormos das instrucCes 
que quisermos. 

De fato, existe uma outra vantagem 
nisso : a instruca'o que estivermos imple- 
mentando nao preasa ser exatamente 
igual a de outros equipamentos, mas sim 
do modo que acharmos mais convenien- 
te aos nossos propositos. 

APRENDENDO AS INSTRUCOES 

A instruca'o DATA tern o seguinte 
formato: 5 DATA 5, 12, 1983, PRIMEI- 
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RO, MARCO ,83. Nos TKs, CPs e NEs, a 
unica instruca'o que permite esse forma- 
to sem apresentar erro de sintaxe 6 a 
linha REM. Podemos utilizi-la como 
DATA, em qualquer lugar do programa, 
mas quanto mais pr6xima do initio mais 
rapida sera sua execucSo. 

Para diferenciar uma linha REM/DA- 
TA de uma linha REM comum devemos 
utilizar, na linha de comentario, um es- 
paco entre a instruca'o e o texto; desse 
modo, REM (espaco) TEXTO nao serf 
interpretado como DATA. 

A instruca'o READ le sequentialmen- 
te os dados da instruca'o DATA. No nos- 
so caso especifico, READ=GOSUB 
9000, o qual retornara" com o dado lido 
na variavel R$. Se o dado desejado for 
um mimero, enta"o, basta utilizar a fun- 
ca"o VAL R$ para obter o valor do dado. 

Isso i muito importante pois, dessa 
forma, a nossa mstrucSo DATA pode 
conter qualquer valor ou expressa'o, por 
exemplo: -5,99^99j(S+A)*3,INT(X+Y/ 
37), etc. 

E importante lembrar que a sub-roti- 
na utiliza duas varidveis, R$ e C, e o 
programa principal nao deve utiliza-las, 
pois seus valores sera"o alterados. 

A instruca'o RESTORE permite que a 
sequencia de leitura seja reimciada e pa- 
ra isso basta fazer LET C = 16508. it 
importante lembrar que deve haver sem- 
pre um RESTORE antes da primeira ins- 
truca'o READ. 

Assimiladas estas instrucdes vamos 
digitar a sub-rotina da listagem a seguir, 



testando-a, atrave"s de RUN. Experimen- 
te modifica?Oes nas linhas REM (DA- 
TA). Modifique a linha 20 para PRINT 
R$, VAL R$ e vi ebminando os da- 
dos que apresentarem erros da funca"o 
VAL. 



Ronaldo de Almeida Santos e" formado em 
Engenharia MecSnica pela FEI. Atualmente 
trabalha na a"rea de pesquisa e desenvolvimen- 
to de terminals ele"tricos, sendo proprieta'rio 
de um TK82-C ha" um ano. 



Rotina READ/DATA 

1 REM DATA/READ/RESTORE 

2 LET C=16508 

3 REH 5,12,1983,PRinEIR0,nARC 
0,83 

10 G0SUB 9000 

20 PRINT R$ 

30 IF R$="Fin n THEN STOP 

40 GOTO 10 

80 REI*1 niCRO SISTEriA5,-8,INT ( 
RND # 9)*1,AL0 AL0 AL0,FII*l 
9000 IF PEEK C=118 OR C=16508 TH 
EN G0SUB 9060 
9010 LET R$="" 
9020 LET C=C*1 

9030 IF PEEK C=26 OR PEEK C=118 
THEN RETURN 

9040 LET RS=R*+CHR$ PEEK C 
9050 GOTO 9020 
9060 LET C=C*5 

9070 IF PEEK C=234 AND PEEK (C*l 
) THEN RETURN 
9080 LET C=C*PEEK (C-2)+256*PEEK 

(C-l)*4 
9090 GOTO 9070 ■ 
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A mais completa exposicao 
de microcomputadores do pais 



A solucao de compra do seu micro estd 
no CEI - Centro Experimental de 
lnformdtica da Sewimec, a mais 
completa exposiqao de micros das mais 
famosas marcas do pais. 
Aqui voce tern acesso aos uarios 
microcomputadores e pode eleger o 
que melhorlhe conuem, atraves de 
testes sob a orientacao de experientes 
professionals que curtem o assunto 
tanto quanto voce. 



E para suas consukas e descobertas, o 
CEI oferece uma liuraria especializada 
que inclui as mais importantes reuistas 
nacionais e estrangeiras. Alem de levar 
o micro e os softwares unicos ao seu 
caso, no CEI voce ainda tern mais 
estas uantagens: preqos e 
condicoes especiais de 




Dei 



financiamento, leasing ou aluguel. 
No CEI voce tern serviqos e 
atendimento completos. 

Venha ao CEI e descubra urn 
admiravel mundo novo. 



Estacionamento proprio. 



Centro Experimental de Informatica 
da Servimec 

Rua Correa dos Santos. 34 - Tel.: 222-151 1 
Telex: (011)31.416- SEPD - BR - Sao Paulo - SP 



Os sistemas operacionais foram indispensaveis para o desenvolvimento 
dos computadores modernos. Veja como eles surgiram e como funcionam 



Uma introducao 
aos sistemas operacionais 



Milton de Albuquerque Bezerra 
Luiz Antonio Bel let i Rodrigues 



Quern procurar famihanzar-se com o uso de computado- 
res, ouvira com frequSncia termos tdcmcos que nab m- 
. tegram o vocabulino cotidiano da maiona das pessoas. 
Um desses termos e o Sistema Operacional, muitas vezes tam- 
bem citado como Supervisor, Monitor ou Sistema Executivo. 

Neste artigo, procuraremos exphcar o que vem a ser um Sis- 
tema Operacional e por que ele tornou-se importante na disse- 
minacao do uso de computadores. Ale'm disso, iremos mostrar 
as caracteristicas basicas de alguns sistemas operacionais para 
nucrocomputadores. 

SISTEMA OPERACIONAL: O QUE £? 

Ao usarmos um computador, seja nosso micro pessoal ou o 
computador de nossa empresa ou banco, sabemos que nos co- 
municamos com ele por meio de programas (software). Mas 
quando ten tamos identificar, dentro do sistema global que nos 
6 apresentado, a parte que corresponde ao software e a que 
corresponde ao hardware (a mdquina propnamente dita), de- 
frontamo-nos com algumas dificuldades. 

Estd sistema global que e apresentado ao usuino pode ser 
chamado de maquina virtual. Isto 6, corresponde ao hardware 
associado a um software (que no caso 6 o Sistema Operacio- 
nal), de modo que o computador disponha de atrativos adicio- 
nais e seja mais facilmente manipulado pelo usuario do que os 
circuitos eletronicos que o compoem. Na verdade, para a maiona 
dos usuinos, o Sistema Operacional esti totalmente integrado 
ao hardware. 

De forma objetiva, podemos definir Sistema Operacional 
como uma colecao de programas, normalmente fornecida pelo 
fabncante do computador, que tern por objetivo tornar o uso 
da miquina mais seguro, fdcil e eficiente. 

A figura 1 llustra a hierarquia obedecida pelos diversos tipos 
de software, bem como o conceito de mdquina virtual, que vai 
se estendendo em camadas ate" que o sistema alcance o ni'vel 
de detalhamento desejado. 

Ate este ponto, preocupamo-nos em exphcar o que vem a 
ser um Sistema Operacional. £ muito importante, entretanto, 




MAQUINA VIRTUAL APRESENTADA AO USUARIO 



Figura 1 - Conceito hierdrquico de maquina virtual 

entender por que os sistemas operacionais sab indispensaveis. 
Para tanto, vamos nos reportar as origens da computa?ao. 

UMA ABORDAGEM HISTORICA 

Os pnmeiros computadores eram miquinas eletronicas que 
a cada tarefa executada exigiam intensa interacao do homem 
com a maquina. Cada programador era um expert, obngado a 
conhecer todos os detalhes da maquina, ao mesmo tempo em 
que todo o trabalho estava centrado no computador, colocan- 
do em segundo piano a aphcacao e o resultado final esperado. 

Com o tempo, cada programador passou a definir conjuntos 
de convencdes, procurando cnar rotinas padronizadas para a 
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execucfo das operacoes mais comuns, de modo a poupar tem- 
po e mininuzar os erros de mampulacao do computador. A par- 
tir desse comportamento dos programadores, comecaram a 
surgir bibhotecas de procedimentos que procuravam uniformi- 
rar as varias convencoes existentes e permitiam reduzir o tem- 
po que o especialista perdia na operacSo do computador, dele- 
gando estas tarefas a um operador menos qualificado. 

operador, seguindo os padrdes defimdos, intervinha em 
cada fase do processamento, supervisionava toda a entrada/sai- 
da de programas e dados e mantinha registro de quern usava o 
computador e para que. Como a velocidade da maquina era 
baixa, a eficiencia com que as tarefas de operacao eram reali- 
zadas tinha menor importance. 

Este quadro modificou-se com o aparecimento de compu- 
tadores mais rapidos e poderosos - os computadores da deca- 
da de 60, que chegavam a ter uma velocidade 100 vezes supe- 
rior a de seus antecessores. Este grande aumento de velocida- 
de, entre outras novidades, tornou insuportavel o uso de pro- 
cedimentos operacionais ineficientes. Em outras palavras, se 
antenormente o operador necessitava de cerca de cinco minu- 
tos para miciar uma tare fa que durava duas horas, ti'nhamos 
somente 4% do tempo util do computador desperdicado. Mas 
se fossem necessanos cmco rrunutos para miciar um programa 
de cdlculo antmetico a ser executado em 30 segundos, pratica- 
mente ten'amos gasto todo o tempo em tarefas de lnicializacao. 

Portanto, tornou-se imperativa a introducao de controles 
que permitissem a automacao do processo de micializacao dos 
programas e, como consequencia, fornecessem maior dispom- 
bilidade de tempo para as tarefas de processamerito. 

Como a maquina passou a ser controlada pelo operador e 
por ela pr6pna (programa do usuano em execuqffo), novas di- 
ficuldades surgjram. programador podia escrever programas 
que utilizassem mal a maquina - por exemplo, o programa 
podia alterar a ordem de chamada das pr6ximas tarefas ou 
acessar um arquivo de outro usuano. Dificuldades desta natu- 
reza exigiram que deterrmnados comandos da maquina nao es- 
tivessem diretamente na mao dos programadores, mas subordi- 
nados a um controle impessoal que sena exercido por um con- 
junto de programas, que foi denominado de Sistema Opera- 
cional. 

Com a introducao de novas facilidades no hardware dos 
computadores, entre elas o conceito de interrupcao, foi pos- 
si'vel projetar sistemas operacionais de dois niveis: ni'vel Super- 
visor e nivel Usuario. Com a defimcao destes dois niveis, foi 
possivel restnngir ao ni'vel Supervisor a execucao de controles 
de maquina que pudessem interferir nas tarefas de outros usua- 
rios. Por exemplo, se um computador adrrute vinos usuarios 
simultaneamente, quando um deles est a" escrevendo em uma 
umdade de fita magnetica nenhum outro podera faze-lo en- 
quanto o pnmeiro nao a hberar . Fica claro que os recursos do 
sistema que podem ser compartilhados devem ter um alocacao 
centralizada. Este controle e feito pelo Sistema OperacionaJ e 
se o programa do usuario necessitar de uma operacao de acesso 
ao recurso, precisa fazer uma chamada ao Sistema OperacionaJ 
que, passando para o ni'vel Supervisor, executa a operacao soli- 
atada. 

Aldm das diferencas ja citadas, foi importante o micio da 
utilizacao de canais autonomos de entrada/saida, os quais, fun- 
cionando em paralelo com o processador, permit iram hberar a 
UCP do controle de transference de dados entre os penfericos 
e a mem6na principal. Os Sistemas Operacionais passaram a 
admit lr multiprogramagdo, ou seja, enquanto um programa 
aguardava a conclusao de uma operacSo de entrada/saida, ou- 
tro programa, residente na memona principal, podena usar o 
processador ate* que o pnmeiro estivesse pronto para recome9ar. 

O apnmoramento do hardware e o refinamento dos concei- 
tos introduzidos permitiram aos Sistemas Operacionais .terem 
uma funcao vital no computador, passando a supervisionar o 
comportamento dos programas da instalacao. Em funcao de 
parametros previamente estabelecidos, o Sistema Operacional 
carrega, interrompe ou limita as acoes dos programas, contro- 
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la o armazenamento de dados e dinge o uso dos penf^ncos, 
entre outras funcoes. 

Os Sistemas Operacionais dos computadores atuais, bem 
como os dos microcomputadores, tern usado os conceit js defi- 
mdos procurando, (obviamente dentro das limitacSes do had- 
ware de cada sistema), reduzir ao minimo a intervencao do 
usuano em atividades lntri'nsecas ao funcionamento da maqui- 
na, de tal forma que o usuano se preocupe quase exclusiva- 
mente com o seu problema especifico. 

UMA CLASSIFICA^AO DOS SISTEMAS OPERACIONAIS 

Uma forma de caractenzar os sistemas operacionais e pelo 
principal tipo de servico que prestam ao usuino. A seguir, 
apresentamos uma possivel classificacao que enquadra a maio- 
na dos sistemas. 

SISTEMA TIPO LOTE (BATCH) 

Os sistemas operacionais do tipo lote funcionam de acordo 
com o propno nome, isto e\ um lote de tarefas 6 orgaruzado na 
entrada e as tarefas sao processadas sequencialmente, uma apos 
a outra. 

Em sistemas deste tipo o tempo de resposta (tempo decorn- 
do entre a entrega da tarefa ao sistema e saida do resultado) 
pode ser alto, devido ao agrupamento das tarefas, fazendo com 
que programas curtos submetidos ap6s um programa longo te- 
nham que esperar a execucao por ordem de chegada, degra- 
dando o tempo de resposta. Por outro lado, os sistemas tipo 
lote, quando bem projetados, podem ter um throughput (razao 
de execucao de tarefas por umdade de tempo) minto alto, por- 
que o processador e melhor utiiizado e os sistemas operacio- 
nais podem ser bem simphficados. j 



„ KALHAU ENGENHARIA, 
A MAIS COMPLETA LINHA DE 
MICROCOMPUTADORES. 



TK-85 

• Linguagem BASIC 

• 10 Kbytes de ROM 

• 16 ou 48 Kbytes de 
memona RAM 

• 40 teclas e 160 funcoes 

r APPLY 300: 

• Microprocessador Z80-A 

• Linguagem BASIC 

• 8 Kbytes de ROM 

• 69 teclas tipo membrana 
flexivel com 160 funcdes 

> • 32 ou 48 Kbytes de RAM 





CURSOS: 
Bask Basico, 
Basic Avancado, 
CPM/DOS e Assembler. 
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SCHUMEC — DIGITUS — j 
TK-83 — 
J. R. DA SYSDATA 



• ApUcativos • L'tUitdnos • Perifiricos 

•Acessorios • IMeratura Ticnica • Jogos 

Despachamos para todo o Brasil. 
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KALHAU ENGENHARIA LTDA 
Prapa Tiradentes, 10 sala 402 
Cep. 20.060-Rio de Janeiro 
Tel. (021) 252-2752 



UMA INTRODUQAO AOS SISTEMAS OPERACIONAIS 



SISTEMAS COMPARTILHADOS (TIMESHARING) 

Nos sistemas compartilhados o usudno tem acesso ao com- 
putador atraves de um terminal de video ou teleimpressor, en- 
quanto a capacidade de processamento do sistema 6 dividida 
por todos os usuanos conectados ao computador em um deter- 
minado instante. Cada comando do usuano e interpretado e 
executado em seguida. Em caso de erro, este 6 lmediatamente 
comunicado atraves do terminal. 

Nestes sistemas o usudno normalmente prepara os seus pro- 
gramas no propno terminal, por meio de um Editor de Textos, 
compila-os, executa-os e comanda a impressao dos resultados 
quando achar conveniente. Em caso de erro, ele providencia as 
altera90es, utilizando o Editor de Textos, e repete o procedi- 
mento. 

Os sistemas compartilhados devem dar resposta em alguns 
segundos para a maiona dos comandos de tal modo que cada 
usuano tenha a impressao que o sistema esta dedicado a sua 
tare fa. 

Os problemas provocados pelo compartilhamento da me- 
m6na prmcipal e dos penfe"ncos e pela seguranca dos arquivos 
armazenados em memona secundaria, tornam os sistemas ope- 
racionais compartilhados muito mais complexos e com um 
throughput muito menor do que os sistemas tipo lote de mes- 
mo porte. Mas, consideiando outr^s fatores. tais como o tem- 
po humano para desenvolver e depurar unvprojeto complexo. 
a produtividade de cada tarefa torna-se muito maior. 

SISTEMAS DE TEMPO REAL (REAL TIME) 

Em sistemas de tempo real os comandos devem ser execu- 
tados num intervalo de tempo realistico em termos humanos. 
isto e, o sistema deve responder num intervalo de tempo prefi- 
xado, apos o qual havera perda de informa96es ou operacao 
mcorreta. 

Estes sistemas sao semelhantes aos sistemas compartilhados. 
mas seus objetivos sao muito diferentes. Eles sao destinados a 
aphcacoes de medicao/controle que exijam monitoramento 
continuo de mstrumentos e tempos de respostas n'gidos. Alem 
•disso, em tempo real um ou mais usuanos estao operando um 
linico programa ou um pequeno conjunto de programas, en- 
quanto em sistemas compartilhados cada usuano esta execu- 
tando uma aphcacao diferente. Os sistemas de tempo real sao 
normalmente operados por um funciondno ou cliente de deter- 
minado serviijo. enquanto em sistemas compartilhados o usua- 
no e normalmente um programador. 

Alguns sistemas de tempo real sao construi'dos para aphca- 
coes especificas, tais como reservas de passagens aereas, con- 
trole de trafego, controle de refinanas, bolsas de valores etc. 

SISTEMA OPERACIONAL COMO ADMINISTRADOR 
DE RECURSOS 

Uma outra abordagem que e utilizada para o entendimento 
dos sistemas operacionais e encara-los na fun?ao de adminis- 
tradores. responsaveis pnncipalmente pela atuahzacao perma- 
nente do estado de cada recurso, definicao da politica de alo- 
cacao de recursos (quern recebe, quanto e o que) e a hberacao 
dos mesmos. 

Quando adotamos este enfoque, podemos, de forma concei- 
tual, dividir o sistema operacional em quatro gerencias, (figura 
2), que sao as seguintes: 

Gerencia de Memoria 

Tem como fun9ao primordial manter atualizado o estado de 
memona, isto 6, controlar as partes de memonas que estao sen- 
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SISTEMA OPERACIONAL 



DEPURADORES 



COMPILADORBS ASSEMBLER CARREGAOORES 



APLICACOES 



EDITOR DE 

TraTOS 



UTILITARIOS 



OSUAHIO 



Figura 2-0 sistema operacional como um administrador de recursos 

do utihzadas, identificar quern as esta - usando e supemsionar 
as areas disponfveis. Alem disso, deterrruna a aloca9ao de mais 
mem6na (quando e quanto), garante a integridade das dreas de 
programa, impedindo que outro processo acesse posi9<3es de 
mem6nas reservadas para um determinado programa. e libera 
com facilidade as dreas de memonas quando um processo nao 
mais delas precisa. 

Gerencia de Processador 

A Gerencia de Processador, atraves dos seus vanos modulos, 
e" responsavel pelo controle de todos os processos em andamen- 
to num computador. 

A figura 3 mostra um esquema de vanos estagios por que 
passa um processo. Inicialmente, o processo e selecionado e fl- 
ea no estado PRONTO. Neste estado, ele esta" apto a receber o 
processador. isto e\ aguarda que o sistema operacional o colo- 
que em execu9ao. Quando o processo esta - sendo executado, 
ele pode terminar ou ser interrompido para que o processador 
atenda um processo de maior pnondade ou para que seja reali- 
zada uma opera9ao de entrada/saida. processo permanecera 
no estado BLOQUEADO ate que a condi9ao de bloqueio seja 
satisfeita, quando passara ao estado PRONTO, aguardando no- 
va dispombilidade do processador. 

Gerencia de Perif4ricos 

A Gerencia de Penfencos mantem o controle dos perifen- 
cos, canais e unidades de controle, decidindo sobre sua aloca- 
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Figura 3 - Diagrama de estados utilizado pelo gerente de processador 
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9S0 e miciando operacoes de entrada/sai'da, bem como garan- 
tindo a seguranca, isto e, impedindo a utilizacao indevida de 
um recurso previamente alocado. 

Eerencia de Informacoes 

A Gerencia de Informacoes e" responsavel pelo controle do 
uso de arquivos, ou seja. abre e fecha arquivos e decide se o 
processo pode ou nao acessar as informacoes. 

SISTEMAS OPERACIONAIS PARA MICROS 

Os microcomputadores mudaram totalmente o desenvolvi- 
»nto dos sistemas operacionais, que evolui'ram (em complexi- 
ide) acompanhando o aumento da capacidade de processa- 
lento dos computadores. No caso especifico dos micros, de 
)rma semelhante. pnmeiro construi'ram-se momtores simples, 
recendo postenormente sistemas operacionais mais podero- 
a medida que o hardware se desenvolvia. 
Os microcomputadores sao geralmente onentados para um 
unico usuano, processando um programa de cada vez. Seus sis- 
temas operacionais sao bastante simples e fdceis de construir. 
£ necessana, por£m, a compatibmzacao com programas ja exis- 
tentes, sendo mais comum a utilizacao de sistemas operacio- 
nais largamente usados. 

Existe uma grande vanedade de momtores e microcompu- 
tadores, com diferentes configurates de hardware. £ dificil 
construir um sistema operacional que seja adaptivel em qual- 
quer maquina, principalmente devido a existencia de diversas 
UCPs. Pore"m, a construgao modular do monitor permite uma 
relativa compatibilizacao em UCPs semelhantes. 

Com o objetivo de llustrar os vanos ni'veis (em complexida- 
de) de sistemas operacionais para microcomputadores que po- 
dem ser instalados em uma mesma configuracao de hardware, 
veremos a seguir exemplos de sistemas operacionais de uso ge- 
ral para microcomputadores com UCP Zilog Z80, Intel 8085 
ou Rockwell 6502, e um conjunto de penfencos bem vanado. 
pnmeiro deles e" o CP/M, sistema bastante difundido e de 
aphcacoes bem diversas. Depois passaremos ao MP/M, sistema 
mais recente e mais complexo, e por fim veremos o CP/NET, 
que utiliza parte dos dois sistemas antenores numa rede, ten- 
dencia atual dos sistemas operacionais. 

CP/M 

CP/M (Control Program for Microcomputers) e um siste- 
ma operacional para microcomputadores adaptavel a diversas 
configuracoes de hardware. CP/M e" monoprogramavel, ou 
seja, onentado para um unico usuirio (um so console) e e" en- 
contrado em um numero muito grande de micros, com as mais 
diversas configuracoes e utilizacdes. 

Existe um grande numero de programas ]& desenvolvidos 
para o CP/M, disponiveis no mercado. Seu grande sucesso no 
mundo inteiro deve-se a facilidade de implantacao e utilizacao. 
a sua organizacao modular e a flexibilidade em diversas confi- 
guracoes, sem muita especificidade de utilizacao. 

Basicamente. a unica hmitacao de um rrucrocomputador 
quanto a implantacao do CP/M e" a memdna. £ preciso que ele 
tenha um mimmo de 20 Kbytes de mem6na RAM continua, 
miciando do endereco zero. Teoncamente, o CP/M suporta 
qualquer tipo de disco, impressora e terminal. Porem, expe- 
riences mostraram que discos com capacidades acima de 8 Mb 
nao podem ser usados. 

MP/M 

MP/M e" um sistema operacional bem similar ao CP/M, po- 
re m mais complexo. Ele e" multiprogramavel, suportando ate 
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Figura 4 - Configuracao bdsica de um sistema CP/NET 

16 consoles, e roda todos os programas feitos para o CP/M, 
mantendo compatibilidade inclusive com os comandos mtri'n- 
secos do sistema operacional. 

Ao contrano do CP/M, o MP/M nao reside em um local 
fixo do disqTlete. Ele e um arquivo no diretono do disquete. 
carregado por um programa especial ou entao atraves do CP/M. 

No MP/M os programas nao sao executados em lugar fixo 
na memona, podendo ser colocados em diferentes particoes e 
executados simultaneamente com outros programas em outras 
posicoes. Cada console e um usuano e possui um diret6no em 
particular, podendo acessar arquivos do sistema ou de outro 
usudrio. Tambe'm 6 possivel proteger os arquivos atraves de se- 
nnas. 

CP/NET 

CP/NET £ um sistema operacional modular de controle 
de rede, residente parte em um micro principal com MP/M e 
penfencos rdpidos de grande porte, e parte em micros menores 
funcionando com CP/M. 

CP/NET visa justamente possibihtar o uso de poucos pen- 
fencos de grande porte (discos rigidos, impressoras rdpidas 
etc.) por vanos micros, de forma a amphar o potencial de pro- 
cessamento dos micros com estes penfencos sem onerar o pre- 
CO de cada configuracao. (Ao contrano dos micros, os penfe- 
ncos de grande porte sao extremamente caros, tornando muito 
custosa sua utilizacao para apenas um microcomputador.) 

CP/NET nao modifica o CP/M ou o MP/M. No requisitan- 
te (CP/M), o CP/NET controla as operacoes de E/S e, quando 
destinadas a penfencos remotos, manda mensagens pela rede. 
No servo (MP/M) o CP/NET £ um conjunto de processos em 
execucao. Estes processos recebem e controlam todas as men- 
sagens dos requisitantes, executando as operacoes necessanas. 
A figura 4 llustra a configuracao de um sistema CP/NET. 

O CP/NET suporta um grande numero de diferentes topo- 
logias de redes e vanedades de equipamentos penfericos, sendo 
possivel ainda a configuracao com mais de um sistema pnnci- 
pal (o servo) e tambdm requisitantes sem discos ou impresso- 
ras, s6 com console e memona. executando todas as operacoes 
de disco pela rede. 
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Uma pequena introduQSo e comparaqao entre o TRSDOS, o NEW DOS e o CP/M 



DOS vs. OS: uma 
breve comparacao 



Newton Braga Junior 



Aeficiencia do uso de um sistema 
de computacio necessita de um 
rigoroso oontrole sobre suas 

atividades: carregamento de programas; 
entrada e saida de dados; oacionamen to, 
no devido tempo, de um determinado 
penferico; calculos etc. 

Se tudo isso fosse feito por um ser 
humane a tare fa seria quase impossivel, 
pois exigiria muito do operador, que 
na"o teria condicOes de executar um tfo 
grande mimero de operacOes e muito 
menos a capacidade de cumpri-las com 
a rapidez necessiria. 

Por isso, foi criado o Sistema Opera - 
cional , que faz com que o proprio com- 
putador use a sua capacidade para exe- 
cutar tarefas de rotinas extremamente 
complexas, pordm perfeitamente defini- 
das. Em tempo, o Sistema Operacional e" 
um programa ou uma sene de rotinas 
agrupadas em m6dulos, desenvolvidas 
para controlar todos os recursos dispo- 
niveis em um sistema de computaeffo. 

De um modo simples, pode-se clas- 
sificar um Sistema Operacional em dois 
tipos: o Sistema Operacional em Disco 
(em ingles, DOS) ou o Sistema Opera- 
cional Simples (OS em ingles). No DOS, 
as rotinas do sistema ficam armazena- 
das no disco e somente sSo carregadas 
para a memona quando acionadas, ou 
seja, quando solicitadas, num procedi- 
mento que recebe o nome de over-lay. 
Quanto ao OS, todo o sistema 6 carrega- 
do para a memoria do computador 



quando de seu acionamento e todas as 
rotinas passam a ficar residentes na me- 
m6ria ate" que ele seja desativado. (Uti- 
lizaremos neste artigo as siglas DOS e 
OS porque, apesar de estarem em ingles, 
sao as efetivamente utilizadas no Brasil.) 

Em microcomputadores que utilizam 
o DOS, existe uma mem6ria chamada 
ROM (PROM, EPROM etc) que 6 onde 
fica armazenada a linguagem (o Inter- 
pretador, normalmente BASIC, com o 
qual o micro trabalha) e o Sistema Mo- 
nitor, que tern como funcSo controlar a 
utilizac^o do micro e carregar a parte 
principal do DOS. O Sistema ocupa, 
quando carregado, uma porc2o de me- 
m6ria RAM e complementa o BASIC re- 
adente. 

Em micros que usam o OS, existe ape- 
nas uma pequena mem6ria EPROM que 
conte"m a rotina de carga do sistema em 
questa"o. restante da mem6ria do mi- 
cro 6 a RAM, que passa a conter o siste- 
ma operacional e a linguagem que o mi- 
cro esta" operando: BASIC, COBOL, 
FORTRAN, Pascal etc. 

Uma diferenca deve ser observada : o 
DOS 6 um sistema mais poderoso que o 
OS, pois possui uma drea maior para sua 
alocacao. que € o disco. Em compensa- 
9S0, ele 6 mais lento, pois tern que car- 
regar uma determinada rotina do disco 
quando esta for solicitada. Quanto ao 
OS, 6 um sistema na"o ta"o poderoso 
quanto o DOS, mas 6 bem mais rapido, 
pois o acesso a memdria (onde estSo alo- 



cadas suas rotinas) e bem mais rapido 
que o acesso ao disco. 

Os sis te mas DOS mais comuns em 
micros sao o TRSDOS, NEWDOS, 
LDOS e o DOS PLUS, estes dois liltimos 
criados recentemente. Com relaca"o a um 
sistema OS, o mais conhecido 6 o CP/M, 
Control Program for Microcomputers, 
desenvolvido pela Digital Research. 

Os quatro pnmeiros sistemas citados 
foram desenvolvidos para a linha do mi- 
cro americano TRS-80, Modelos I e III, 
que ')£ possui vdrios similares nacionais 
compativeis, como CP-500, DGT-100, 
D-8000/1, JR Sysdata, Naja, JP-01 e 
TRS-80 IV. Nestes tamtam os DOSs 
mais conhecidos e usados sao o 
TRSDOS e o NEWDOS, dos quais trata- 
remos agora. 

TRSDOS 

TRSDOS possui rotinas para aces- 
so a disco, gravafSo e leitura de arqmvos 
e programas, rotinas para protecSo de 
arquivos e vdrios outros comandos, tais 
como: 

CMD S - Retorna do BASIC para o sis- 
tema operacional. 

CMD O - Classifica em ordem alfata- 
tica uma matriz string. Por exemplo, 
CMD 0,X,Y$(Z), onde X 6 a varidvel 
que contem o mimero de elementos a 
serem classificados e Y$(Z) 6 o nome da 
matriz e o mimero do elemento matriz 
onde sera" iniciada a classificacao. 
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CMD R - Aciona a marcacSo do tempo 
pelo relogio "aceso" no canto superior 
direito do video. 

CMD T - Desativa o rel6gio. 
CMD Z - Aciona a funcSo que copia na 
unpressora tudo que for mandado para 
o video. 

CMD C - Compressa'o de programas. 
Elimina comentinos e espa90s em bran- 
co que nio estejam entre aspas. 

NEW DOS 

O NEWDOS 6 urn TRSDOS expandi- 
do, com mais comandos e fa alidades. 
Por exemplo, se as teclas JKL forem 
pressionadas ao mesmo tempo, o que es- 
tiver no video £ automaticamente co- 
piado na impressora. Alem disso ele pos- 
sui facilidades para backup (copias) de 
discos, atrave's do comando COPY, que 
permite copiar integralmente um disco 
ou apenas algum programa armazenado 
em um determinado disco, para o mes- 
mo disco ou para outro drive. 

NEWDOS possui ainda um potente 
comando que permite ao usuano do 
equipamento mudar a especificacao de 
cada drive: o comando PDRIVE. Com 
ele, pode-se alterar - um disquete do 
NEWDOS de modo que possa ler um 
disquete gerado no TRSDOS. 



Alguns utilitanos do NEWDOS sao, 
por outro lado, "utjlfssimos" para ope- 
raca"o em disco. Sao eks o LMOFFSET, 
que permite a odpia com facilidade de 
programas em bnguagem de maquina, o 
ASPOOL, que descarrega na impressora 
um arquivo do disco, h be ran do desta 
forma a maquina para outra utibzacao, 
um Editor Assembler para a introducSo 
de rotinas e programas em Assembler, o 
Superzap, que £ um verdadeiro raio-x do 
disco, permit in do -se acessar qualquer 
parte do disco e mudar seu conteudo e o 
DIRCHECK, que analisa o estado de um 
disco e indica o que esta errado (ele nao 
conserta, apenas da" o diagn6stico). 

CP/M 

Alguns micros nacionais de uso mis- 
to pessoal/dome'stico \i rodam o sistema 
operacional CP/M, como DGT-101, o 
S-700, o Schumec, o AP n, Dismac 
series Alfa 2064 e 3000 etc. 

Como dito anteriormente, o CP/M 
nao £ um sistema operacional tao pode- 
roso quanto o NEWDOS, mas £ bem 
mais rapido. Ale'm disso, ao contrano 
dos outros sistemas, que trabalham com 
apenas 32 Kb de mem6ria, o CP/M re- 
quer 64 Kb para poder operar. 

Vdrios programas comerciais ja" foram 
feitos usando o CP/M e programas mais 



comuns, como Folha de Pagamento, 
Controle de Estoque e Contabflidade )i 
sa"o normal mente feitos com o CP/M. 

Ao ser hgado um equipamento que 
utiliza o CP/M , uma rotina residente em 
uma ROM carrega o Cold Start Loader, 
que tern como funcSo carregar todo o 
sistema operacional. Quando o sistema 
ja foi carregado e possui um programa 
em execucS^o, se for necessario um 
RESET no sistema a rotina responsavel 
pelo carregamento do sistema 6 a Warm 
Start. O pr6prio nome indica o que cada 
uma faz: o Cold Start Loader (parti da a 
frio) £ quern faz o carregamento inicial 
do sistema; quando se fizer necessana 
uma nova carga (RESET), ai a respon- 
sabilidade passa para o Warm Start (par- 
tida a quente), que efetua o carregamen- 
to depois de o sistema ja estar funcio- 
nando, apos ele ja estar quente. m 
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• A MICRO'S Processamento de Dados pro- 
move regularmente cursos de programaca"o 
BASIC e COBOL. Para o curso de BASIC sab 
utilizados dois microcomputadores Dismac e 
urn NE-Z8000. com horario individual para 
treinamento. As turmas sao compostas de, 
no ma"ximo, 20 alunos e todo o material di- 
da'tico 6 fomecido pela Micro's. Maiores in- 
formacdes na Rua Duque de Caxias, 450, 
Ediftcio Chams, sis. 702 e 703, tel.: (034) 
253-6965, Uberlandia. MG. 

• O Centro de Informa'tica/Ciencia da Com- 
putacab da UERJ esta promovendo os seguin- 
tes cursos: Tecnicas Avancadas de Programa- 
cab de Mini/microcomputadores em Lingua- 
gem BASIC, de 03/10 a 04/11, segundas, 
quartas e sextas-feiras, das 19:00 as 22:00h; 
Mini/microcomputadores Eletrdnicos — Apli- 
cacdes e Uso, de 08/11 a 07/12, tercas, quar- 
tas e quintas-feiras, das 19:00 as 22:00h. O 
endereco da UERJ e Rua Sab Francisco Xa- 
vier. 524, Pavilhab Haroldo Lisboa da Cunha, 
2? andar, tel.: (021) 284-8322, ramais 2417 e 
2507, Rio de Janeiro, RJ. 

• A Compushop esta realizando, de 1 7 a 27 
de outubro. o curso de BASIC Complete O 
curso terd a duracab de 24h, de segunda a 
quinta-feira, das 18:00 as 21:00h. A Compu- 
shop tambem esta" promovendo o curso de 
VisiCalc, nos dias-9 e 10 de novembro. das 
08:30 as 17:30h, as quartas e quintas-feiras. 
Esses cursos sab limitados a 10 alunos. Maio- 
res informagdes pelo tel.: (011) 210-0187, R. 
Dr. Mario Ferraz, 37, Sao Paulo, SP. 

• Dando continuidade a sua programac3o, 
a EConsult oferece os cursos de Programacab 
BASIC Ni'vel I, Treinamento pratico para di- 
ghadores no CP-500 e Curso de BASIC para 
jovens de 10 a 18 anos. Maiores informacdes 
podem ser obtidas na Rua Segundo Wander- 
ley, 1144, Barro Vermelho. tel.: (084) 222 
3212, Natal, RN. 

• CLUCOMP - Centro de Computacao e 
Servicos oferece os seguintes cursos: BASIC, 
COBOL, FORTRAN, Assembler, Operacao e 
Digitacab. Todos com aulas tedricas e prati- 
cas, turmas pela manna", tarde e noite e espe- 
ciais aos sabados e domingos. Infcio de novas 
turmas todo comeco de mes. Maiores infor- 
macdes na Rua Silva Bueno, 2239, Ipiranga, 
tel.: (011) 215-5625, Sao Paulo, SP. 

• Sistemas de Gestao em Microcomputado- 
res e Recursos Gra"ficos em Minicomputado- 
res sab os dois cursos que o Brasil Trade Cen- 
ter-Divisab de Computadores e Sistemas esta 
oferecendo. Os cursos tern duracab de dois 
meses, o primeiro comeca no dia 5 de novem- 
bro e o segundo no dia 19de novembro. Tur- 
mas de, no ma"ximo, doze alunos. Informacdes 
na Av. Epita'cio Pessoa, 280, Ipanema, tels.: 
(021) 259-1299. 259-1499 ou 259 1542, RJ. 

• A SAESP - Sociedade Amigo dos Estu- 
dantes de Sao Paulo — inicia, a partir de 1 7 de 
outubro, um curso de BASIC. O curso tera 
uma turma de, no ma"ximo, 20 alunos. As au- 
las serab as segundas, quartas e sextas-feiras. 
das 20:00 as 23:00h, com duracao de quatro 
semanas. Maiores informacdes pelo tel.: (011) 
457-9355 ou 240-6616 ou ainda na sede da 
SAESP, na Av. Caminho do Mar, 2709, Rudge 
Ramos, Sao Bernardo do Campo, SP. 

• A CompuShow Computadores Ltda. esta 
oferecendo cursos de linguagem BASIC I e II 
e tambem de Software Aplicativo de Micros. 
Turmas em varlos horarios. Duracab de 20 ho- 
ras com aulas praticas em diversos micros. O 
preco de cada um dos cursos 6 de Cr$ 40 mil, 
pagaveis em duas parcelas. O endereco da 
CompuShow 6 SCRN 708/709, bl. E. Ij. 10, 
CEP 70740, Brasflia. DF. 



• A SCI — Sistemas, Computacao e Informa'- 
tica — est<i oferecendo os seguintes cursos no 
mes de novembro: Administracao de Opera- 
cao do CPD, de 08 a 1 1, Rio; Informa'tica pa- 
ra Usuarios, de 10 a 11, Sao Paulo; Anaiise 
Estruturada para Sistemas com Banco de Da- 
dos, de 22 a 25, Sab Paulo; Planejamento Es- 
trate'gico e Ta"tico de Informa'tica — Piano Di- 
retor, de 22 a 25, S3o Paulo; Elementos para 
AvaliacHo, Selecao e Utilizaqao de Micros, de 
23 a 25, Sao Paulo; Tecnicas para Aumento 
de Produtividade no Desenvolvimento de 
Software. O endereco da SCI no Rio de Ja- 
neiro 6 Rua Jardtm Botanico, 635, 89 andar, 
tel.: (021) 294-7488 ou 294-7797, telex 
23864. CEP 22470; em Sab Paulo 6 Avenida 
Paulista, 2001, Grupo 1020, tel.: (011) 289- 
0099 ou 289-0079, telex (011) 23175, CEP 
0131 1.SP. 

• O Centro Latino Americano de Desenvolvi- 
mento da Informa'tica — CLADI estara pro- 
movendo um curso de Analise Estruturada, de 
17 a 21 de outubro, na PUC-RJ, com carga 
horSria de 35 horas. Inscricfles e informacdes 
no CLADI, Rua Joseh Goncalves de Medeiros, 
96, Madalena, CEP 50000, Recife, tel.: 227- 
2307. telex (081) 3171. PE. 

• O Departamento de Ciencia da Computa- 
cao da UFMG e a Fundaca"o de Desenvolvi- 
mento da Pesquisa — FUNDEP estab promo- 
vendo cursos sobre engenharia de software: 
Metodologia para Desenvolvimento de Siste- 
mas, de 11/10 a 08/11, das 18:00 as22:00h, 
Planejamento e Controle de Projetos de Sis- 
temas, de 10/11 a01/12,das18:00as22:00h. 
Maiores informacOes na Avenida Antonio Car- 
los, Pampulha, Belo Horizonte, Cx. Postal 
1856 ou pelos telefones: 441-8077, r. 170/ 
158 ou 441-3933, MG. 

• A ADP Systems esta oferecendo os seguin 
tes cursos: Programacab de Sistemas (sete me- 
ses); OperacSo de Sistemas (tres meses); Ana- 
lise (quatro meses); Assembler (um mes); Di- 
gitacSo (um mes); BASIC (dois meses). Os 
cursos tern turmas pela manna", tarde e noite, 
em diversos horarios, inclusive aos sabados e 
domingos. Informacoes na Av. Paulista, 1439, 
cj. 31, tels.: (011) 285 3283. 285-4238 ou 
283-31 57. Sab Paulo, SP. 

• A Microshop, alfim dos cursos regu lares pa- 
ra iniciantes e adiantados, esta lancando cur- 
sos espeefficos para me'dicos e administrado- 
res hospitalares. A finalidade destes cursos & 
levar ao conhecimenjo desses especialistas as 
vantagens do uso de microcomputadores em 
consultdrios e hospitais. Os cursos sa"o ofereci- 
dos na sede da Microshop. na Alameda Lo- 
rena, 652. SSo Paulo. SP. 

• Baby -BASIC — Curso de iniciacao em BA- 
SIC-TK para criancas entre quinto e oitavo pe- 
ribdos. A carga horaria e' de 24 horas, com au- 
las de uma hora de duracao as segundas, quar- 
tas e sextas-feiras ou as tercas e quintas-feiras 
com uma hora e meia de duracao. Informa- 
cdes pelo tel.: (011) 284-5635. 

• A CENADIN Come'rcio e Representacoes 
Ltda. promovera cursos de iniciacao em mi- 
crocomputadores e de iniciaca"o a programa- 
cao BASIC, nos seguintes colegios: Col. Sto. 
Americo, Sagrado Coracab de Jesus, Sto. 
Agostinho, Hebraico Biasileiro Renascenca, 
Companhia de Maria, Brasil-Europa, Oswald 
de Andrade, Nuno de Andrade, Washington, 
Cardeal Mota e Galileu Galilei. Maiores infor- 
macoes poderab ser obtidas a Av. Brigadeiro 
Antonio, 290, 69 andar, cj. 64, Sao Paulo, 
tel.: (011) 32-9834. SP. 



• Para informar ao lertor sobre os cursos que 
esta"o sendo oferecidos, a revista recolhe in- 
formacoes em dlversas instituicOes ou as rece- 
be pelo correio. Portanto, nab nos responsabi- 
lizamos por quaisquer alteracdes posterior 
mente efetuadas por estas instituicOes nos 
programas ou precos. 
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MAIS SUCESSO WVRA VOCE! 



Comece uma nova fase na sua vida profissional. 

Os CURSOS CEDM levam ate voce o mais moderno ensino 

tecnico programado e desenvolvido no Pais. 



CURSOS DE APERFEiqOAMENTO 



CURSO DE ELETRONICA DIGITAL 
E MICROPROCESSADORES 



Sao mais de 140 aposulas com mformacdes completas e sempre 
atualizadas Tudo sobre os mais revolucionario CHIPS. E voce 
recebe. alem de umasolida formac3o teorica. KITS elaborados 
para o seu desenvolvimento pratico. Garanta agora o seu futuro. 







1 1 



• • 



CEDM 20 KIT 
de Ferramentas. 
CEDM 78 KIT 
Fonte de Ahmentacao 
5v/1A. CEDM 35 KIT 
Placa Experimental 
CEDM 74 KIT 
de Componentes. 
CEDM 80 

MICROCOMPUTADOR 
Z80 ASSEMBLER. 



CURSO DE 
PROGRAMACA3 EM BASK 



Este CURSO. especialmente programado. oferece os 
fundamentos de Lmguagem de ProgramacSo que dormna o universo 
dos microcomputadores. DmSmico e abrangente. ensma desde o BASIC 
basico ate o BASIC mais avancado. inclumdo nocoes basicas sobre 
Manipulacao de Arquivos. Tecnicas de Programacao, Sistemas de 
Processamento de Dados. Teleprocessamento, Multiprogramacao e 
Tecnicas em Lmguagem de Maquina, que proporcionam um grande 
conhectmento em toda a irea de Processamento de Dados 
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CURSO DC 

ELETRONICA C AUDIO 



M^todos novos e ingditos de ensino garantem um aprendizado 
pratico muito melhor. Em cada nova licSo. aposulas ilustradas 
ensmam tudo sobre Amplificadores, Caixas Acusticas. Equalizadores. 
Toca-discos, Sintonizadores AM/FM. Gravadores e Toca-Fitas. Capsulas 
e Fonocaptadores. Microfones, Sonorizacao. Instrumentagao de Medidas 
em Audio. Tecnicas de Gravacao e tamb6m de Reparaca"o em Audio 



CEDM-1 • KIT de Ferramentas. CEDM 2 ■ KIT Fonte de Ahmentac3o 
+ 15-15/1A. CEDM-3 KIT Placa Experimental 
CEDM 4 - KIT de Componentes. CEDM-5 - KIT Pre-arrtplificador 
Estereo. CEDM 6 KIT Amplificador E stereo 4 Ow 



Voce mesmo pode desenvolver um ritmo proprio de estudo. A lin- 
guagem simplificada dos CURSOS CEDM permite aprendizado facil. E 
para esclarecer qualquer duvida, o CEDM coloca d sua disposicab uma 
equipe de professores sempre muito bem acessorada. Alem disso, vocfi 
recebe KITS preparados para os seus exercfcios pratico*. 

Agil, moderno e perfeitamente adequado a nossa realidade, os CUR- 
SOS CEDM por correspondencia garantem condicOes ideais para o seu 
aperfeicoamento profissional. 

GRATIS 

Voce tambem pode ganhar um MICROCOMPUTADOR. 

Telefone (0432) 23-9674 ou coloque hoje 

mesmo no Correio o cupom CEDM. 

Em poucos diss voo§ recebe nossos catalogos de apresentacao. 



KIT CEDM Z80 

BASIC Cientffico- 

KITCEDMZ80 

BASIC Simples. 

Gabanto de Fluxograma 

E-4. KIT CEDM SOFTWARE 

Fitas Cassete com Programas. 



^FsTJM Avanida S«o Paulo, 718 - Fone (0432) 23-9674. 
LkWLPI I CAIXA POSTAL 1642 - CEP 86100 - Londrina - PR 
CURSO DE APERFEIQOAMENTO POR CORRESPONDENCIA 

Solicito o mais rapido possivel Informacdes sem compromisso sobre o 

CURSO de 

Nome 

Rua 

Cidade 

Bairro CEP 

MS 




Enxadrista experiente, Luciano Nilo de An 
drade ja' escreveu para os jqrnais "Correio da 
Manna", "Data News" e "Ultima Hora" e pa 
ra arevista "Fatos & Fotos" Luciano 6 econo 
mista, trabalhando no Mmistirio da Fazenda. 
no Rio de Janeiro As opmioes e comentdnos 
de Luciano Nilo de Andrade. bem como as 
ultimas novidades do Xadrez jogado por com 
putadores, estarao sempre presentes em 
MICRO S 1ST EM AS 



Aversatilidade dos micros 



Ao miciar uma partida, o micro- 
computador costuma vanar a 
abertura ou a defesa segundo 

determinado random (urn fator aleato- 
no em seu programa), o que ja acontece 
mesmo na abertura da partida. 

Era de esperar que no estagio atual, 
passadas as jogadas armazenadas em sua 
memona. a relaca"o de causa-efeito no 
mesmo ni'vel fosse constante. Contudo. 
vez por outra nos deparamos com va- 
nacOes que na"o invalidam a regra geral, 
mas contnbuem para evitar a repeticao 
monotona de jogadas. 

Great Game Machine revelou essa 
desejada versatihdade frente a* posicSo 
mostrada no diagrama 1, que ocorreu 
apos: 

1 - P4R P4R 

2 - C3BD C3BR 

3 - P4B P4D 

4 - PRxP PxP (4 mm., 7 seg.) 

5 - B5C+ B2D (6 min., 40 seg.) 

6 - B4B B5CR (10 min., 36 seg.) 
7-C3BP3B(13min.,33seg.) 

8 - D2R+ B2R (4 mm., 28 seg.) 
9-PxPCxP(21 min.,45seg.) 
10-B5C 

A partir desta posicao, o GGMjogou 
10 - ...T1CD na pnmeira partida e 
10 - ...C4D na segunda. Vejamos as par- 
tidas: 

1? partida: 

10 - ... T1CD (25 mm.. 38 seg.) 



11-0-0 D3C+ (27 mm., 7 seg.) 

12 - P4D BxC (30 mm., 7 seg.) 

13 - TxB DxP+ (33 mm., 41 seg.) 

14 - R1T C4T (34 mm., 36 seg.) 

15 - T3D D4B (36 mm., 38 seg.) 

16 - T5D DSC (41 mm., 56 seg.) 
17-TxCetc. 

2 a partida: 
10-...C4D(23min.,46seg.) 

11 -0-0D3C+(26min.) 

12 - P4D BxC (29 mm., 27 seg.) 

13 - DxB DxP+ (36 mm., 27 seg.) 
14-RlTP3TD(37min.) 

15 - CxC PxB (40 min., 1 1 seg.) 
16-C7B+R2D(45min.) 

17 - T1D DxT (46 mm., 52 seg.) 
18-DxD+etc. 



m 

* r 

™ ' ^5 HP 



SURPRESAS DO COMPUTADOR 

Nesta posica"o, a maiona dos jogado- 
res, sem pensar muito, jogana 1 — ... 
R2C(?!). Contudo, o Kaissajogou 1 - 
...T1R e perdeu depois de 2 — DxT 
R2C. Havena alguma coisa errada com o 
computador ou seu programa? 

No dia segumte, foi perguntado ao 
Kaissa o que ele tena jogado depois de 

1 - ...R2C(?!) se tivesse as brancas. A 
resposta foi fulminante: 1 — ... R2C; 

2 - D8BD+!! Surpreendente sacnficio 
de dama! 2 - ...RxD; 3 - B6T+ e de- 
pois de 3 - ..JUC ou 3 - ... B2C as 
brancas jogaram 4 - T8B+ DID; 5 - 
TxD+ T1R; 6 - TxT mate! 




H A IP A 1 



Diagrama 1 - Posicao apds iO - B5C. 



Diagrama 2 — Duchess x Kaissa, II Campeona- 
to Mundial de Computadores, Toronto, agos- 
to de 1977. Nesta posicao as pretas jogaram 
1 -... T1R(?\). 
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tbrancasjogam e dao mate em trGsjogadas. 

O Great Game M a chine, gastou 2 mi- 
tos e 42 segundos para encontrar a jo- 
j-chave da combinacao com o Pro- 
Steinitz, com 2 - D8BR+!!. Para- 
>xalmente, gastou 3 minutos e 35 se- 
idos para jogar 3 - B6T+! e anunciar 
ite em tres jogadas, como previra o 
sa. 

PROBLEMAS PARA OS LEITORES 

Ai va"o dois problemas pubhcados na 
•vista Scien<* & Vie, para voces tenta- 



iHJt. 



m**~ww/. 



*P 



As mm a up a 



m.f* wm. y wm. y 
....i, wm. y Wm. y ww,. 



As brancas jogam e ganham rapidamente. 

rem resolver e testar a capacidade de 
seus micros enxadn'sticos. 



Solupao dos problemas: 

P+081 - Z 
'jbisb^b as etuep e as ++U81 - fr -Old 
+O x 8 - Z oeiuB 'ixa"- - 2 as esajap 
eq ogu a jxi - z -±XU \+±*Q - I - Z 

"++A9S — Z 
•a^d i+D x Q - Z '0*d i+090 - L - I 



N 
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• Traducoes e versoes 
exclusivas para a 
comunidade de informatica. 

• Pioneiros no setor. 

• Manuais e publicacoes 
diversas. 

• Graficos. 

• Supervisao Tecnica de 
prof issionais atuantes - 
analistas e consultores. 

• "Linguagens de alto nivel" 

aliadasa qualidade 
velocidade de entrega. 



7D\scoverz 



TRADUQOES 
Informacoes 
pelos telefones: 
(021) 264-6392 

264-7391 

228-2798 




) MPC-03 f MPC-12 MOSTRAM QUE TAMANHO 
NAO EDOCUMENTO. E DESEMPENHO. 




Istao ai os dois modems da 
icisa que est§o revolucio- 
a transmissSo de dados 
m ic ro computadores: 
;-03e MPC-12. 

Com urn design moderno e 
)acto, estes dois pequeninos 
litem que voce tire o mciximo 

desempenho e ef iciencia, 



por urn consumo reduzido e de 
baixo custo. 

O MPC-03 opera em velocida- 
de de ate 300 BPS, no modo 
duplex ou semi-duplex, a dois fios 
em linhas privativas ou discadas. 

O MPC-12 e asslncrono e 
opera em ate 1 .200 BPS, em li- 
nhas privativas ou discadas, com 



um equalizador que compensa 
as distorcoes normalmente 
encontradas em linhas discadas. 

Procure os dois pequeninos da 
Coencisa nas lojas especializadas. 

Eles veto apresentar 
o melhor documento 
da praca: 
o desempenho. 
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isilia: Tel: (061) 591-4640 Md«kdiComiWct««Ma4 

>:Tel. (021)224-9172* Sao Paulo:Tels.: (011) 240-3764 ou 543-5392* Porto Alegre: Tel.: (0512)24-4330. 



Um pequeno roteiro do funcionamento do Interpretador BASIC Applesoft, da digitagao a execugao 





idra 



Sidra 



Como funciona o Interpretador 
BASIC do Applesoft 



Rudolf Horner Junior 



oda vez que fazemos uma en- 
trada de caracteres pelo tecla- 
do, as teclas que digitamos sao, 
uma a uma, registradas no buffer do 
teclado (situado a pagina dois de memo- 
na do Apple, bytes 200 a 2FF, em hexa- 
decimal). Depois que pressionamos a te- 
cla RETURN, o Interpretador BASIC 
varre a sequencia que escrevemos e pro- 
cura interpret^ -la. 

Jd no principio, o computador iden- 
tifica se o usuano esta desejando cnar 
uma hnha de programa ou simplesmente 
usando urn comando de execucao dire- 
ta. Caso a sequencia de caracteres princi- 
ple por um numero, estaremos escreven- 
do uma hnha de programa que nao sera, 
portanto, executada lmediatamente. 

Dessa forma, quando uma hnha de 
programa acaba de ser digitada, o compu- 
tador vai identificar os comandos da hn- 
guagem BASIC que foram usados e re- 
gistrar a linha que acabou de ser mtro- 
duzida em uma certa regiao de memoria 
especialmente destinada ao registro de 
programas em BASIC. 



Para o caso do microcomputador 
Apple e de seus similares nacionais, e' 
a partir da lmha hexadecimal 800 (2048 
em decimal) que sao registrados os pro- 
gramas em BASIC que estao sendo utili- 
zados. Para a versao mais antiga do 
Apple, aquela que na"o dispoe de lingua- 
gem BASIC Applesoft re side nte, o prin- 
cipio dos programas, uma vez carrega- 
dos na mem6na, fica no byte 3000 
(12288 em decimal). 

Quando vai ser registrada uma hnha 
de programa na memoria, o Interpreta- 
dor venfica em qual posicao, entre todas 
as hnhas que ja tenham sido utilizadas 
antenormente, deverd ser introduzida 
sua interpretacao. Uma vez locahzado 
este ponto, a hnha de programa e" regis- 
trada na memoria e todos os comandos 
BASIC que sao identificados sSo marca- 
dos com o uso de apenas um unico byte, 
o que significa que o comando PRINT 
tern uma forma de representacao inter- 
na que consome apenas um linico byte. 

Existe uma tabela onde todos os co- 
mandos sao associados a um numero 



de cddigo e & este numero que repre- 
sentara" o comando quando da necessi- 
dade de registra-lo. (Esta tabela consta 
dos manuals dos equipamentos e por 
isso nao a mostraremos aqui.) 

Quando os comandos utihzam para- 
metros, estes sao igualmente registrados 
nestas areas de memoria. Ao usarmos 
mais de um comando em cada linha, o 
Interpretador consome mais um byte 
para diferenciar um comando do outro. 
Para indicar o final da hnha, o Interpre- 
tador registra um byte com o valor zero 
ap6s os bytes que representam a hnha 
digitada. Os niimeros de hnhas, que po- 
dem lr de a 63999, tambe"m sao regis- 
trados pelo Interpretador. 

O processo para a cnacao de uma no- 
va linha de programa £ muito simples: 

1 - O computador, apos encontrar o 
ponto de onde a linha devera entrar, 
registra, com o uso de dois bytes, um 
apontador que indica qual serd o ende- 
reco da pr6xima hnha do programa que 
esta sendo armazenado. 
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2 - Depois deste apontador, nos dois 
bytes seguintes, o Interpretador registra 
o numero da linha que acabou de ser re- 
gistrada. 

3 - Em seguida, sequencialmente con- 
forme a ordem de entrada, sao registra- 
dos os c6digos dos comandos e seus 
eventuais parametros. Para diferenciar 
comandos multiplos em uma mesma 
hnha, 6 usado urn byte para separar cada 
comando, enquanto para representar o 
final da linha usa-se um unico byte com 
o valor zero. 

Assim, para registrar uma unica linha 
de um programa em BASIC, sao consu- 
midos pelos menos seis bytes: dois bytes 
para o apontador para a proxima linha; 
mais dois bytes para o numero da linha; 
pelo menos um byte para o codigo do 
comando; e, finalmente, um unico byte 
com o valor zero para indicar o final da 
linha. 

Para que se saiba o lugar onde o ar- 
mazenamento do programa em BASIC 
esta" encerrado, o Interpretador BASIC 
marca tres bytes sucessivos com o valor 
zero para representar o fim do registro 
do programa em BASIC. 

Quando executamos o comando 
LIST, o que o computador faz 6 percor- 
rer a sequencia de bytes a partir do en- 
dereco 800, escrevendo os numeros de 
hnhas, os comandos representados pelos 



c6digos armazenados e os parametros e 
vandveis usados no programa que fica- 
ram registrados na mem6na. 



10 


HOME 


20 


PRINT 


30 


END 



Figura 1 

Para que seja mais fdcil entender, veja 
a figura 1 , onde temos um pequeno pro- 
grama que mostra como o Interpretador 
funciona. Na listagem da figura 2 esta" 
relacionada a sequencia de bytes que 
codifica o programa em BASIC da figura 
1 , representando o conteudo dos bytes a 
partir do byte 800 (hexadecimal). Neste 
caso, os simbolos a direita que terttam 
interpretar a sequencia de bytes em co- 
mandos do processador 6502 nab tern 
nenhum significado. Importam apenas 
os valores dos bytes localizados a direita 
dos numeros hexadecimais. 

Veja amda na figura 2 como o Inter- 
pretador defiruu o final da codificacao 
do programa. Existe uma sucessao de 
tres bytes com valor zero, qu« sao os 
bytes de numero 812, 813 e 814. Quan- 
do sao encontrados estes tres bytes se- 
guidos com valor nulo, sabe-se que a lis- 
tagem do programa chegou ao fim. 

Para registro do programa, a linha 
uncial, numero 800, nao € utihzada: o 



pnncipio real 6, na verdade, na linha 
801. Nos bytes 801 e 802 existe um 
apontador para o byte 807, que e a li- 
nha seguinte do programa em BASIC (o 
byte 801 conte'm 07 e o byte 802 con- 
tain 08. No Apple, isto significa um 
apontador para o byte numero 0807.) 

Em seguida, nos bytes 803 e 804, 
temos, respectivamente, os valores 0A e 
00. Esta 6 a codificacao da hnha de pro- 
grama numero 10. No byte 805, temos 
o valor 97, que 6 o c6digo, em hexade- 



*800L 












0800- 


00 






BRK 




0801- 


07 






??? 




0802- 


08 






PHP 




0803- 


0A 






ASL 




0804- 


00 






BRK 




0805- 


97 






??? 




0806- 


00 






BRK 




0807- 


0D 


08 


14 


ORA 


$1408 


080A- 


00 






BRK 




080B- 


BA 






TSX 




080C- 


00 






BRK 




080D- 


13 






??? 




080E- 


08 






PHP 




080F- 


IE 


00 


80 


ASL 


18000, X 


0812- 


00 






BRK 




0813- 


00 






BRK 




0814- 


00 






BRK 




0815- 


0A 






ASL 




0816- 


4C 


4F 


00 


JMP 


$004F 


0819- 


20 


08 


14 


JSR 


$1408 



Figura 2 



Ml KSR BI-DIRECI0NAL III 

O unico terminal teleimpressor fabricado no Brasil. 



A ISA, Industria de Impressoras S/A, acaba de lancar o 

primeiro teleimpressor genuinamente brasileiro. Sua alta 

tecnologia eletronica, prova na pratica sua capacidade 

de trabalho. Imprime por matriz de pontos 9x7, 

permitindo ate 8 copias impressas, com uma 

velocidade de 100 C.P.S. Equipado com 

membria standard de 2 K caracteres, 

utilizando f ormulario continuo, 

folhas soltas ou bobina de papel. 

De 64 ate 132 caracteres por 

linha, com interface serial 

RS 232 elo de corrente e 

paralelo. Sua velocidade 

de comunicacao e de ^ 

50 a 9.600 B.P.S. 

8 diferentes 

tiposde 

impressao. 




Conheca mais 

detalhesdo 

Teleimpressor 

KSRna 



INDUSTRIA DE IMPRESSORAS S.A. 

Escritono 

R Prol Jose Marques da Cruz. 234 

Fabric* 

Rua Centro Africana. 74 

Tels (011) 240 2442 543 4939 

Tel*x:(011)36926IIIMBR 

Sao Paulo S.P. 



H»II MA Of PIHXI 1SAMI HIO Of DADOS I TiltCOMUNICACOfS 

MATRIZ: Rio de Janeiro R. Republics do Libano. 61 12 and. 

Tel.. (021) 221 4677 Telex (021) 30187 

FILIAIS. S. Paulo R. FreiCaneca. 1119 Tel (011)284 8311 Telex (011)22191 

Brasilia SCS02 BlocoC n.° 41 SL 01 Tel. (061)225 1588 Telex (061) 1750 

Porto Alegre Rua Santa Terezinha. 300 Tel.:(051)32 3564 Telex (051)2144 

Goiania Belo Honzonte Salvador 
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INSTITUTO DE TECNOLOGIA ORT 



CURSOSDE 
PROCESSAMENTO DE DADOS 



FORMACAO DE PROGRAMADORES 
(COMPLETO) 

Dura^ao: 8 meses 

Horario: 2 a a 5 a feira de 19:00 as 22:00 hs 

MIC ROCOMPUT ADORES E A 

LINGUAGEM BASIC 

Duracab: 3 semanas 

Horario: 2« a 5» feira de 19:00 as 22:00 ns 

Turmas de 15 alunos 



AMPLA UTILIZAQAO DO 

IBM-4341 E DO LABORATORIO 

DE MICROCOMPUTADORES 



Visite o CPD-ORT - Diariamente apos 
13:00 hs - R. Dona Mariana, 213- Botafogo 
Rio de Janeiro - Tels.: 226-3192 "246-9423 




LOJA 
MICRO-KIT 

TUDO SOMi MKItOCOMI»UTADOR 

LANQAMENTO: 

Livro de Basic vol. I 

Edicao Prdpria 

CURSOS 

Basic p/adultos e criancas. com meto- 
do prOprio comprovadamente eficiente; 
Professores c/mestradoem ENGENHA- 
RIA DE SISTEMAS; mais de 20 cursos 
aplicados. Turmas pequenas aulas pra"- 
ticas com MICR0C0MPUTAD0R. 

VENDA DE MICROCOMPUTADOR 

Unitron AP II, Digitus, TK e CP 200. 
Financiamento em ate" 24 meses. 

PROGRAMAS 
Comerciais e Jogos p/ APPLE, Unitron, 
Polymax. Digitus TK e CP200. 

SUPRIMENTOS 

Disquetes. Caixa p/ Disquetes, Formu- 
la" rios Continuos etc. 

VENDA DE LIVROS E REVISTAS 

Despachamos para todo o Brasil. 



Rua Visconde de Piraji, 303 S/Loja 
210 - Tels. (021) 267-8291 - 52V4638 

CEP 22410- Rio de Janeiro 

Rua Visconde de Piraji, 365 sobreloja 

209 - Ipanema 
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Figura 4 



COMO FUNCIONA O INTERPRETADOR BASIC DO APPLESOFT 



cimal, que representa o comando HOME 
do BASIC. Desta forma, a bnha 10 do 
programa da figura 1 foi registrada. 
byte 806 com o valor nulo indica que a 
linha 10 '}& foi encerrada. 

No registro das outras linhas, o pro- 
cesso 6 an&ogo. A partir do byte 807, 
temos o apontador para a linha seguinte, 
mais dois bytes com o numero da linha 
(que neste caso e" 20), o byte 80B com o 
valor BA (que 6 o c6digo que representa 
o comando PRINT) e o byte 80C com 
valor nulo, indicando o fim da linha 
numero 20. 

No registro da linha 30 temos nos 
bytes 80D e 80E o apontador para a 
proxima linha. Desta vez n5o existe 
pr6xima linha, pois a presente € a ultima 
do programa. Por esta razao, o aponta- 
dor para a linha seguinte simplesmente 
aponta para o segundo byte da sequen- 
cia de tres que define o final da codifica- 
cao do programa. E temos ainda, nos 
bytes 80F e 810, a representacSo hexa- 
decimal do numero de linha 30 e, final- 
mente. no byte 80F o valor 80, que e" 
o c6digo do comando END. 

Ai est! Todos os programas BASIC 
sao codificados com o uso deste proces- 
so. Desta forma, podemos alterar os pro- 
gramas de duas formas. Uma 6 fazer 
como sempre fazemos, ou seja, alteran- 
do o programa com os recursos normals 
de edicao de programas. A outra forma 
e" alterar os valores dos bytes que repre- 
sentam o programa com o uso do co- 
mando POKE ou mesmo entrando em 
Monitor. 
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10 REM PROGRAMA TESTE DE NUMERO 

S 
10 PRINT 
10 PRINT 
10 PRINT 
10 PRINT 



Figura 3 



Veja um exemplo na figura 3. Trata- 
se de um programa simples em BASIC 
onde foram diretamente alterados os 
bytes onde estavam registrados os nume- 
ros das linhas do programa. Todos os 
bytes foram alterados de forma a esta- 
belecer o numero 10 para todas as linhas 
de programa. 

Alguns recursos mteressantes podem 
ser usados. Considere um programa que, 
quando executado, altere os valores dos 
bytes que o codificam. Trata-se do caso 
de um programa que altera a si propno. 
Veja na figura 4 um exemplo. Tente 
executd-lo. Aparentemente, nada acon- 
tece. Faca uma hstagem dele ap6s sua 
execucfo e... surpresa! O programa per- 
corre ele pr6pno e muda o valor dos 
bytes que defmem o numero das linhas. 



Figura 5 

Veja a linha 50. £ nesta linha, com o 
uso do comando POKE, que os numeros 
das linhas s5o alterados. 

Expenmente agora executar o pro- 
grama da figura 5. Desta vez, as linhas 
nao s3o alteradas. O programa percorre 
sua codificacao, anotando os enderecos 
dos bytes que codificam o pnmeiro co- 
mando de cada uma das linhas. Depois, 
na linha 60, todos os enderecos sao 
preenchidos com o valor 178, que £ o 
c6digo do comando REM (em decimal). 
Desta forma, apos a execucfo do progra- 
ma, os comandos miciais de cada linha 
sao iguais ao comando REM. 

Utilizando estes dispositivos podere- 
mos fazer qualquer coisa a hstagem do 
programa sem, necessanamente, mexer 
com comandos da linguagem BASIC. O 
unico detalhe importante € que, para 
termos sucesso em uma modificacao, 
deveremos saber com exatidao em que 
endereco de mem6na esta" registrada a 
informaca"o que desejamos alterar. ■ 



Rudolf Horner Junior cursa Ciincia da 
Computaoao na Unicamp e 6 sdcio do Poten- 
tial Software, empresa que desenvolve progra- 
mas especiais para microcomputadores em 
Campinas, SP. 
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Maxxi r o micro pessoal muito 

prof issional da Polymax. 
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a e um microcomputador pessoal — profissional de grande versatilidade 
jurada possibilidade de expansao. Compativel com APPLE II 
>•, aceita mais de 5 mil programas aplicativos disponiveis no mercado. 
jcaracterfstica padrao inclui um monitor e linguagem Polysoft Basic, ambas 
Jas em ROM, com 2 kbytes e 10 kbytes, respectivamente, 48 kbytes de 
Jria RAM disponfveis para o usuirio; interface para gravador cassete, 
i e tv colorida (sistema PAL-M); teclado padrao ASC II e fonte de 
ntacao, dispostos em um gabinete prbprio. 

I aqui sua essencia tecnka: 

_._cessador 

! operando com frequencia de 1 MHZ. 

d possui um video profissional de 12" com fosfatizacao verde e pode 
jr-se tambem com uma televisao comum (colorida ou preto & branco), 
do no modo texto ou grafico (baixa ou alta resolucao), sendo 
tamente transparente ao usuario o acesso a mem6ria. No modo grafico, 

4 linhas do video operam no modo texto. Todos os modos de 
So com o video sao selecioniveis por Software. 
Texto 

Icaracteres/linha, 24 linhas. 
teres 5x7 
normal, reverso e piscante. 
}le pleno do curso. 
i Grafico 
resolucao) 

[h x 48 v ou 40 h x40v com 4 linhas de texto. 
\ cores selecionaVeis por Software. 

lando especfficos do Polysoft Basic para uso 
i Modo Grafico: COLOR. PLOT, HUN, VLIN, SCRN. 
resolucao) 

i h x 192 v ou 280 h x 160 v com 4 linhas de texto. 
i cores selecioniveis por Software. 

nandos especificos do Polysoft Basic para uso no modo 
co: HCOLOR, HPLOT. 
igem do video residente em 8 kbytes. 



Agora vamos 

processar os dados 

tec nicos dele. 

Memdria 

A membria dinamica RAM e organizada em 3 incrementos de 16 kbytes cada 
um, num total de 48 kbytes totaimente disponiveis para o usuario. Esta 
mem6ria pode ser aumentada conforme a necessidade do usuario adicionando 
placas de expansao. Possui tambem 10 kbytes de ROM para armazenamento 
do Polysoft Basic e 2 kbytes de ROM para o sistema monitor. Sistema de 
"Refresh" automatico. completamente transparente. Mem6ria rapida — tempo 
de acesso de 350 ns. 

Entrada e Saida 

O Maxxi inclui um teclado com padrao ASC II; interface para gravador cassete, 
video e tv colorida sistema PAL-M; um conjunto de 8 conectores para a ligacao 
de cartoes controladores de perifericos e expansoes; 3 entradas de 1 bit, 4 
entradas analogicas para conexao de "joystick" e 4 saidas digitals de 1 bit. 

Polysoft Basic 

Possui caracteristicas bisicas do padrao Basic com tecnicas de forma a propiciar 
maximo rendimento dos recursos de Software do produto. 

Monitor 

Gravado em ROM com 2 kbytes. 

Perifericos e acessorios disponiveis 

O Maxxi de concepcao modular, cresce de acordo com os perifericos a ele 
incorporados, dentre os quais destacamos: TV comum, a cores ou preto & 
branco — Monitor profissional Polymax de 12" com fosfatizacao verde — 
Unidade de drives de disquetes de 5V4", organizado com 25 trilhas, 16 setores 
de capacidade de 256 bytes cada um — Unidade de gravador cassete — 
Interface serial para impressora — Impressora Polyprint 90 CPS de 80/132 
colunas — Controladores de jogos — Interface serial para comunicacao de 
dados — Modem — Placa de expansao de mem6ria RAM para 64 kb — Placa 
de CPU Z-80 (sistema operacional CP/M) — Placa Videx expansora de video de 
40 para 80 colunas — modulador de R.F. 



(• Outros produtos da Polynux: 
• POLY 301 WP (Polyscrirji) 

• POLY 201 DP • POLY 105 OP 

• POLY 201 DE • POLYNET 
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BIBLIOTECA DE SOFTWARE 

Para solucionar os problemas de 
quern necessita de software, desde os 
programas genencos ate os especificos 
de cada area, surge em Sao Paulo a Bi- 
blioteca Brasileira de Software. A BBS 
possui um acervo de aproximadamente 
quatro mil programas para microcompu- 
tadores das hnhas Apple. TRS-80 e Sin- 
clair. Para usufruir deste acervo, o inte- 
ressado deve tornar-se assmante, me- 
diante uma taxa de inscncaoeuma taxa 
de manutencao mensal. A BBS oferece 
tambem a seus associados palestras e 
cursos nas diversas areas de interesse. 
Uma infra-estrutura composta de micro- 
computadores e demonstradores esta a 
disposigao dos assinantes na sede da 
BBS. para onenta-los sobre a correta uti- 
lizacao dos programas. Maiores informa- 
coes podem ser obtidas atraves dos tele- 
fones (011) 210-1251 e 813-6407. 




Microcomputador 1-7000. da Itautec. 

ENTRADA DE DADOS 
NO 1-7000 

Os usuarlos do microcomputador 
Itautec 1-7000 poderao em breve utilizar 
os seus equipamentos para entrada de 
dados. E que a empresa esta desenvol- 
vendo o software SED — Sistema de En- 
trada de Dados, que permite gravar dire- 
tamente em formato IBM. dispensando a 
conversao. De acordo com o fabricante, 
uma das principals caracteristicas desse 
software e o seu alto nivel de consisten- 
cia dos dados em tempo de digitacao. 

Usando oito dos 64 Kbytes de memo- 
ria RAM do micro 1-7000. o interpretador 
do SED — software totalmente compati- 
vel com os programas de entrada de 
dados em linguagem TAL — deixa os 
restantes 56 Kbytes disponiveis como 
buffer de entrada de dados. O SED sera 
apresentado em cartucho de EPROMs 
para uso no 1-7000. estando tambem dis- 
ponivel em disquete 



APPLY 300 

Produzido para ter uma aceitacao 
rapida no mercado, o Apply 300, da CDSE 
— Centro de Desenvolvimento de Siste- 
mas Eletronicos, possui vanas caracte- 
risticas para facihtar o usuario. tais como: 
teclado de 69 chaves. tipo membrana 
flexivel; feedback auditivo BIP; RESET 
de maquina em duas teclas pressionadas 
simultaneamente e apenas uma para 
RESET do BIP; teclas numericas duphca- 
das; RUBOUT; EDIT; GRAFIC; FUNCTION; 
ENTER; THEN; TO; teclas independentes 
de SHIFT; entre outras. 

O APPLY 300 utiliza o microproces- 
sador Z80-A de 8 bits, com uma frequen- 
cia de 3.25 MHZ de clock e com 8 Kb de 
ROM, onde reside o interpretador BASIC. 
Sua capacidade de memoria e oferecida 
em tres versoes: 16 K, 32 K e 48 K bytes. 

Quanto aos perifencos, o APPLY 300 
conta com serial tipo RS 232-C, para im- 
pressora ou comunicacao com outros 
sistemas. Esta capacidade possibihta a 
utihzacao de qualquer impressora dispo- 
nivel no mercado. ou ate mesmo adapta- 
coes em IBM de esfera. por exemplo. 

UM APLE II PLUS 

BRASILEIRO! 

A Milmar Industria e Comercio Ltda. 
de Sao Paulo, esta langando o Apple II 
Plus, que, como diz o nome, e integral- 
mente compativel com seu irmao ge- 
meo amencano. A unica diferenca. se- 
gundo seu fabricante, e que o modelo 
nacional e adaptado para ser hgado ao 
televisor a cores no sistema Pall-M. O 
Apple II Plus tern UCP com microproces- 
sador 6502. velocidade de 1 MHz. 48 
Kbytes de memoria RAM expansiveis ate 
64K e oito conectores para hgacoes de 
perifencos. Possui saida para video, ope- 
rando com televisor preto e branco ou a 
cores, saida para gravador cassete e tra- 
balha com controlador de ate quatro uni- 
dades de disquetes de 5 1/4". O teclado 
do Apple II Plus possui 52 teclas. seme- 
ihantes as da maquina de escrever. e te- 
cla especial para repeticao automatica. 
O equipamento tern um alto-falante inter- 
no para emissao de vozes e musicas. O 
Apple II Plus ja esta sendo comerciah- 
zado em lojas especializadas. 

ALTA RESOLUQAO 

Os usuanos dos computadores 
TK82-C, TK83/85. CP-200 ou NE-Z8000 
contam agora com mais um recurso para 
seus equipamentos: adaptacao de alta 
resolucao. Este recurso possibihta a cria- 
cao de desenhos mais detalhados, uteis 
em jogos e aphcacoes tecmcas, como 
desenhar circuitos, mapas e plantas. Atra- 
ves das lojas Computique e Imares. am- 
bas em Sao Paulo, a adaptacao de alta 
resolucao em micros pessoais pode ser 
teita por CrS 45 mil. 




LIMPEZA DE COMPONENTES 

Contacmatic e um produto fabricado 
pela Marmo Industria de Produtos Qui- 
micos para limpeza de produtos eletro- 
nicos. Trata-se de um solvente suave em 
forma de spray que possibihta a limpeza 
sem tocar nos componentes. Seu uso e 
indicado para a limpeza e restauracao de 
continuidade eletrica em todo tipo de 
contato. O produto vem sendo usado em 
empresas de processamento de dados, 
bancos e industria eletronica para limpar 
cabecas magneticas. circuitos impressos, 
etc. Contacmatic e encontrado nas lojas 
de pecas e componentes eletronicos, 
bem como nos fornecedores de micro- 
computadores. 



NEXUS 1600 

Um microcomputador de 16 bits, 
totalmente compativel com o IBM PC. e 
o novo lancamento da Scopus que esta- 
ra sendo mostrado ao publico durante a 
III Feira de Informatica. em outubro, em 
Sao Paulo. O Nexus 1600 funciona com 
microprocessador Intel 8088 e. segundo 
o Gerente de Produto Sihneu Perez Nu- 
nes. integra-se dentro de uma nova fami- 
ha de micros, diferente dos que a Scopus 
vinha trabalhando ate entao. Uma novi- 
dade e seu design. O equipamento esta 
dividido em tres modulos: teclado, moni- 
tor de video e parte logica. O teclado al- 
fanumenco esta hgado ao sistema por 
cabo tipo mola, podendo ser operado a 
distancia de ate 1,5 m da unidade cen- 
tral. Sao quatro os modelos de momto- 
res de video disponiveis para o Nexus, 
sendo dois preto e branco e dois a cores. 
O video padrao. de media resolucao, tern 
80 colunas por 24 hnhas e fosforo verde. 
Junto a parte logica do equipamento 
estao embutidos dois drives para disque- 
tes. A memoria do sistema compreende 
64 Kbytes de EPROM e a memoria para o 
usuario vai desde 64 Kbytes de RAM. 
passando pelas versoes com 128 e 256 K, 
alem de placa de expansao de 512 Kby- 
tes. Na configuragao basica, com video 
de media resolucao. o preco do Nexus e 
de 1.600 ORTN s mais 10% de I PI. e sua 
comerciahzagao sera feita diretamente 
pela Scopus ou via revendedores cre- 
denciados. 
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MLOGO DA MICROARTE 

A software house paulista Microarte 
•sta colocando no mercado a sua versao 
da hnguagem LOGO, hoje considerada 
como a pnmeira para o aprendizado de 
computacao. A MLogo, da Microarte, e 
uma versao modificada da original, com 
lodos os comandos em portugues. A 
MLogo foi desenvolvida para os micro- 
eomputadores nacionais compativeis com 
o Apple II e para utihza-la e necessano 
um equipamento com. no minlmo. 64 
Kbytes de memoria RAM. um drive para 
disquetes e uma impressora opcional. 
A MLogo pode ser encontrada nas lojas 
especializadas na comercializacao de 
micros e penfencos. 



NOVIDADES PROLOGICA 

A Prologica firmou convenio com a 
I software-house DbMicro. para forneci- 
Tiento do Dbll para os usuanos do Siste- 
ma 700. O Dbll e a versao nacional do 
Data Base II, hnguagem de facil compre- 
sao que foi cnada nos Estados Unldos 
para ser utilizada pelos engenheiros da 
I NASA 

Tambem para os usuanos do S-700, 
a Prologica esta lancando o Super File. 
s sterna de disco rigido que utiliza a 
tecnologia Winchester, para ampliar a 
capacidade de armazenamento de dados 
e aumentar a velocidade de recuperacao 
de informacoes. O Super File sera ofere- 
<- cido em duas versoes: de 5 e 10 Mbytes 
formatados. Nos prbximos meses. a Pro- 
logica estara colocando no mercado o 
disco rigido Winchester W-500. de 5 e 10 
Mbytes. E para dezembro. a empresa 
esta prometendo o langamento do W-500. 
de 15 Mbytes. 

E o CP-200, outro equipamento da 
Prologica. esta sendo tabncado agora 
com a funcao Speed, que aumenta a ve- 
locidade de transmissao de dados para o 
gravador bem como a velocidade de lei- 
tura. de 300 para 4.200 Bauds (caracte- 
res por segundo). 



PRO ELETRONICA 

Inaugurada recentemente em Sao 
Paulo, a Pro Eletronica possui microcom- 
putadores. penfencos, supnmentos, vi- 
deogames. Iiteratura nacional e estran- 
geira. Na Pro Eletronica, o chente encon- 
tra equipamentos da Unitron. Polymax, 
Sysdata. Prologica e Microdigital. A loja 
desenvolve software atendendo as ne- 
cessidades dos clientes e da assistencia 
tecnica para os micros que vende. Sao 
oferecidos regularmente cursos de hn- 
guagem BASIC, Sistemas Operacionais e 
apiicativos. aiem ae paiestras sobre ln- 
tormatica. A nova loja fica na Rua Santa 
Efigenia. 568. Tel.: (011) 221-9055. Sao 
Paulo. 
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LINGUAGEM LOGO 

Dois estudantes da Escola Pohtec- 
nica da USP. Fabio da Cunha e Jecel 
Mattos Jr.. desenvolveram e estarao lan- 
cando na Feira de Informatica o PEGAS- 
SOS, pnmeiro microcomputador que vem 
com hnguagem LOGO. Segundo Fabio 
da Cunha, a hnguagem LOGO e a mais 
adequada para se aprender computacao 
por sua facihdade de uso. dai sua grande 
aphcacao junto a cnangas. O PEGASSOS 
funciona com microprocessador 6809, da 
Eletrola, com velocidade de 1MHz. A me- 
moria do sistema e de 16Kbytes de ROM, 
podendo chegar ate 64K, e a memoria do 
usuano e de 64Kbytes. O novo micro tern 
teclado alfanumenco, com todos os ele- 
mentos do portugues. como g e toaos 
os acentos. O equipamento ja vem com 
interface embutida para hgacao com gra- 
vador cassete e com televisor comum. 
inclusive TV a cores (8 cores no sistema 
Pall/M). O PEGASSOS possui sistema 
operacionai gratico. som. e tern expan- 
soes para aisco, impressora e para nga- 
cao a um outro micro. Pode tambem 
receber cartuchos com jogos e com ou- 
tras nnguagens. 

O R 470 DA RITAS 

Com novidades no teclado. maior ve- 
locidade de leitura. aprimoramento de 
alguns comandos BASIC e capacidade 
de 8 Kb de ROM e 16 Kb de RAM. ambas 
expansiveis. a Ritas do Brasil. tradicional 
fabncante de botoes de pressao. esta 
lancando o microcomputador RINGO 
R 470. 

O RINGO utiliza uma CPU Z-80. te- 
clado com 49 teclas. inclusive para edi- 
cao e correcao com repeticao automati- 
ca. Ele possui amda os comandos PRINT, 
PLOT, SCROLL e CLS mais apnmorados. 
A velocidade de gravacao normal e de 
2.400 BPS, sem que o desempenho do 
gravador e da fita comprometam a leitura 
pelo micro. 

A capacidade do R 470 e de 8 Kb de 
ROM e 16 Kb de RAM. expansiveis para 
16 Kb e 48 Kb, respectivamente, e traz 
amda cartuchos de memoria ROM INS- 
TANTSOFT engataveis no aparelho, que 
nao ocuparao a memoria RAM, possibih- 
tando a operacao instantanea do progra- 
ma. Todos estes cartuchos poderao utili- 
zar uma resolucao grafica de tela, com 
definicao de 256 x L192 pontos. 

Um dos cartuchos acopiaveis ao 
RINGO e um editor para hnguagem ae 
maquina. Com ele. o operador tern toaos 
os recursos para editar programas |a fe«- 
tos em hnguagem de maquina para ou- 
tros micros da mesma faixa e podera tam- 
bem tazer novos programas utiiizanao 
15 Kb be programas nesta hnguagem. 
O mesmo cartucho permitira a leitura e 
gravagao de EPROMs de 2 ou 4 Kb. ae 
quaiquer aos modeios existentes no mer- 
caao 
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sLSTRINICA 

PR6 ELETRONICA 
COMERCIAL LTDA. 

Ru» Santa Eflginia. 568 - CEP 01207 - S«o Paulo - SP 
Tels. : 220 7888 - 221 -9055 - Telex (011) 34901 - POEC 
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CONTACMATIC e urn limpador especifico 
para equipamentos eletronicos. CONTAC- 
MATIC contem Freon TF. que deixa conta- 
tos. reles. seletores de canais. cabecas mag- 
neticas de computadores e gravadores. me 
canismos de precisao. maquinas de calcular. 
relogios e muita coisa mais. limpo. limpo. co- 
mo novo! 

Para melhor manutencao: 
COOLERMATIC, congelador de circuitos pa 
ra facilitar a localizacao de defeitos intermi- 
tentes em circuitos eletronicos (aerosol 
200grs). 

ISOMATIC, laca para proteger e isolar circui- 
tos impressos contra oxidacao (aerosol 
150grs ). 

SILIMATIC. lubrificante seco a base de silico- 
ne para equipamentos eletronicos e de preci- 
sao Repele umidade e protege contra oxida 
cao (aerosol 200 grs.). 

THERMATIC. pasta termica para dissipar ca 
lor em componentes eletronicos. Aumenta a 
condutibilidade termica entre o dissipador e o 
semi condutor (embalagem de 15grs.. 
100grs ou a granel). 

A VENDA NAS LOJAS DO RAMO 



If r : 



MARMO ft FILHOS LTDA. 

Vandai a administracao: R Ribeirc de Lima. 453 Bloco D 

6 andar ci 605 CEP 01 122 Caua Postal 957 

Sao Paulo SP F 222 5451 e 223 6585 

Fabnca: R Duarie de A/evedo 568 
CEP 02036 Sao Paulo SP F 299 6051 



VENTILADOR PARA 
LINHA APPLE 

A Termatic Juntas de Expansao Ltda. 
esta lancando no mercado o ventilador 
Micro-Fan. Destinado a evitar falhas nos 
microcomputadores causadas pelo su- 
peraquecimento, o Micro-Fan e montado 
diretamente na grade de ventilagao do 
Microengenho. Unitron e Apple II. dis- 
pensando o uso de parafusos e ferra- 
mentas. O ventilador possui duas toma- 
das para conectar o computador e o mo- 
nitor de video que, controladas por inter- 
ruptor e lampada piloto, garantem a liga- 
cao simultanea de todo o sistema. O en- 
dereco da Termatic e: Av. Mercedes Benz, 
390, Distrito Industrial de Campinas — 
SP. CEP 13.100, tel.: (0192) 31-0633. 
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Micro-Fan, ventilador da Termatic para 
micros da linha Apple 



SUPRIMENTOS 

A Simigra — Suprimentos e Equipa- 
mentos para Computacao Ltda. comer- 
cializa, em Curitiba e Fioreno 
polis, uma ampla linha de suprimentos 
para processamento de dados! Os pro- 
dutos vendidos incluem fitas impressoras 
nacionais; fitas, discos e disquetes mag- 
neticos; pastas para formulario continuo; 
etiquetas auto-adesivas; formularios con- 
tinuos padrao; recuperagao de discos 
magneticos; maquinas de corte e separa- 
cao de formularios continuos; estabiliza- 
dores eletronicos para micros, minis e 
grandes computadores. modems. 

Os enderecos da Simigra sao: Curi- 
tiba — Rua 24 de maio, 2937 — Parolin. 
tel.: (041) 224-9002; Florianopolis — Av. 
OsmarCunha, 15 — 8.°andar. s/811. tel.: 
(0842)23-1091. 
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STRINGS 



• A AIT — Automacao Industrial, Infor- 
matica e Telecomunicagoes Ltda acaba 
de incorporar o Departamento de Auto- 
macao e Controle da AEG — Telefunken 
Sistemas Industrials Ltda. A AIT atua na 
solucao de problemas relacionados com 
o controle do tempo real de processos 
industrials. 

• A Brascom passa a oferecer ao mer- 
cado, a sua linha de microcomputador 
BR1000 M Multiusuario, com o proces- 
sador Zilog Z80 B, com clock de 6 MHz. 
Esta transformacao aumenta em 40% a 
velocidade de processamento. 

• Aparas de formularios continuo, pa- 
pel de impressora, livros e revistas ve- 
Ihos podem fazer sobreviver a Fundacao 
para o Livro do Cego no Brasil . Atraves- 
sando seria crise econdmica. ha alguns 
meses a Fundacao vem promovendo in- 
tensa campanha para arrecadacao de 
papel a ser reaproveitado na impressao 
de livros para os cegos. 

• A Livraria Nobel, de Sao Paulo, aca- 
ba de criar urn novo departamento: a 
Nobel Computadores, que comercializa 
micros pessoais. software, perifericos e 
suprimentos. alem dos livros e revistas 
especial izados. 



• Foi inaugurada em Sao Paulo a 
STAUF Processamento de Dados Ltda. 
A nova software house oferece alguns 
sistemas comerciais e se dedica ao de- 
senvolvimento de programas especificos. 

• A dB/MICRO de Sao Paulo esta lan- 
cando um novo sistema para gerencia- 
mento de banco de dados, o dBASE/ll. 
O sistema foi projetado para usuarios 
que nao conhecem a linguagem de pro- 
gramacao. Seu objetivo e ensinar como 
manobrar dados (arquivos). como fazer 
relatorios e como fazer sistemas basicos. 

• A Cobra esta oferecendo as empre- 
sas de Artes Graficas um novo sistema 
de geracao de textos a serem fotocom- 
postos, constituido pelo microcomputa- 
dor Cobra 305 e pelo software denomi- 
nado Sistema Processamento da Palavra 
— SPP. 

• O Instituto Brasileiro de Administra- 
cao Municipal — IBAM esta oferecendo. 
em listagens ou gravados em disquetes, 
diversos dados referentes aos munici- 
pios brasileiros. Essas informacbes estao 
disponiveis no setor de Processamento 
de Dados do Instituto, atraves do SIM — 
Sistema de Informacbes Municipals. 
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PROMOCAO 

PROGRAMADA SHARP 



lO QUE PROGRAMAR? 

O grande potencial do Computador de Bolso PC-1 21 1 R 
e RP estci no fato de, como um verdadeiro micro de bolso, 
ser totalmente programavel em "BASIC", linguagem facil de 
programacSo, adotada pela maioria dos microcomputadores 
existentes hoje no mercado. 

O POCKET COMPUTER permite aplicagoes nas mais 
diversas areas. Todas as equagSes, calculos, fdrmulas e 
modelos emuladores utilizados dia a dia pelos engenheiros, 
economistas, topdgrafos, arquitetos, financistas, estudantes 
eoutros, tern na PC-121 1 uma aplicagao imediata, 
economizando tempo e agregando agilidade, pois sendo de 
bolso, pode ser usada em qualquer local, onde o equipamento 
se faca necessario (na obra, no cliente, no aviso, no carro, na 
escola. em casa e ate no escrit6rio como os outros nao 
portateis). 

2. COMO PROGRAMAR? 

Operacionalmente, a PC-121 1 permite utilizar um 
gravador de audio comum para gravar programas e dados, 
mais a impressora incorporada e a sofisticagSo da 
programagSo que aceita palavras como dados, nos 
possibilitando usar o equipamento para: controlar estoques, 
emitir planilhas e tabelas de financiamento, calcular retorno 
de investimentos; controlar horarios de consultas e 
audiencias de medicos e advogados; realizar calculos 



estatisticos em laboratbrios ou institutos de pesquisa; 
formulagao de ragao balanceada na agropecuaria; controlar 
saldos bancarios e orgamentos domesticos; divertimentos e 
tantas outras aplicagoes que voce pode desenvolver apds 
aprender a programar (Informe-se s/ curso gratuito de 
Linguagem Basic • "CENPRO"). 

Se nao bastasse isto; a SHARP criou o "NUCLEO DE 
INFORMACOES DO POCKET COMPUTER", que tern por 
objetivo reunir os usuarios compradores da PC-121 1 num 
"clube de software", permitindo o intercambio de programas 
entre os pr6prios usuarios, e oferecer apoio e informagoes 
atraves de uma publicagao peri6dica, divulgando os 
programas enviados pelos usuarios, atendendo consultas, 
promovendo cursos, palestras, publicando artigos de 
especialistas em diferentes areas, alem de divulgar os 
programas desenvolvidos pela prbpria SHARP. 

3.0 PROGRAMA! 

Aceite nosso convite para esse "programa", visite 
um Revendedor SHARP para conhecer o Pocket Computer 
PC-1 21 1 , um novo conceito em calculo e computagao pessoal 
ou informe-se sobre esse "programa", atraves do Nucleo 
de Informagoes do Pocket Computer (Fones: (01 1 ) 259-1 052 / 
284-5662). 

Nota.: Este "clube" ja tern mais de 5.000 socios no Brasil, 
ganhe um "titulo gratuito" e ingresse no mundo da 
informatica com a PC-121 1 - SHARP. 
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ONTIM, PARA POUCOS 
HOJE. PARA MILHOIS. 



Para muitos usuarios, a presenca de um Monitor em seu micro 
e transparente. Mas, para os que programam em Assembler, ele e fundamental. 



Programas Monitores 



Mauricio Baduy 




raticamente todos os sistemas 
operacionais em disco incluem 
vdnos programas utihtanos pa- 
ra auxiliar o programador em alguns 
objetivos especificos. Assim, temos 
editores para a edicao direta dos setores 
do disco, transfendores de programas 
entre disco e fita magne'tica, recupera- 
dores de programas ehminados aciden- 
talmente. spools para imprirrur textos 
enquanto o computador realiza outra 
tarefa. Editor Assembler e Monitores. 

Editor Assembler e o Monitor sao 
utihtanos importantes para quern pro- 
grama em hnguagem de maquina. 
Editor Assembler permite que possamos 
escrever o programa usando os mnemo- 
nicos, que serao postenormente conver- 
tidos em programa objeto. Normalmen- 
te. todo programa precisa de uma fase 
de testes, onde sao identificados e ehmi- 
nados os erros (bugs). 

Uma ferramenta muito util para ana- 
lisar. cnar ou modificar e testar progra- 
mas escntos em hnguagem de maquina 
e o Monitor. Em funcao desta utihdade, 
existem dezenas de Monitores no merca- 
do, cada um oferecendo maiores facih- 
dades e reaJizando sua tarefa melhor 
do que outro. 

No CP/M, por exemplo. temos o 
DDT; no DOS 500 existe o DEBUG; no 
CP-500 existe o Monitor residente; nos 
sistemas NEWDOS 2.0 e DOSPLUS 3.4. 
existe um Monitor semelhante ao 
DEBUG; e assim por diante. Disponi'veis 
no mercado encontramos os seguintes 
monitores (para a hnha TRS-80): 
ZBUG, da Microsoft, que acompanha o 
EDTASM+; o ULTRA-MON, da Interpro; 
STEP-80, da Mumford Micro Systems; o 
TASMON, da The Alternate Source; 



MON-4 e 5, da Howe Software; o 
MACRO-MON, da Advanced Operating 
Systems; RSM-2, da Small Systems Soft- 
ware; e mais uma dezena de outros. 

Pode-se perguntar: em que reside a 
utihdade de um programa Monitor? 
Quais os tipos de acoes que podem ser 
realizadas com tal utihtano? objetivo 
deste artigo e justamente esclarecer os 
usos e funcoes desta importante ferra- 
menta. 

MONITOR 

Basicamente, um Monitor e um pro- 
grama escnto em hnguagem de maquina 
que permite ao programador interagir 
com o seu programa, tambem escnto em 
hnguagem de maquina. Ele e mdispensa- 
vel na depuracao desta classe de progra- 
mas, por permitir uma execucao contro- 
lada. Isto quer dizerque podemosdefinir 
pontos de interrupcao (breakpoints) 
dentro do programa que estamos tes- 
tando, de maneira que quando um des- 
tes pontos 6 encontrado. o Monitor re- 
cupera o controle da situacao, permitin- 
do o exame do conteudo dos registros 
da UCP no momento da interrupcao. 
Pode-se tambe'm executar o programa 
em camara lenta, de maneira mterpreta- 
tiva. 

AJem desta facihdade de execucao 
controlada, os Monitores oferecem 
uma grande vanedade de comandos. 
Uma opcao das mais comuns nos Moni- 
tores e a de permitir a visualizacao e al- 
teracao do conteudo dos enderecos da 
memoria RAM, bem como a visualiza- 
cao do conteudo dos enderecos da ROM. 
Esta visualizacao pode ser em ASCII 
ou hexadecimal, sendo que alguns 
Monitores oferecem a possibihdade ex- 



tra de se visuahzarem os conteudos em 
ASCII, hexadecimal e bindno. 

Normalmente tambem 6 possi'vel a 
visualizacao e alteracao dos registros do 
usuano (veja adiante), uma opcao im- 
portante para testar programas em situa- 
cSes pre"-determinadas. Alem disso, a 
execucao pode ser miciada em qualquer 
endereco do sistema, bastando para isto 
teclar um comando e o endereco micial 
desejado, como se pode tambem mter- 
romper esta execucao num dado ende- 
reco, estabelecendo-se um breakpoint. 

Sao encontrados tambem comandos 
de carga/grava5ao de programas em hn- 
guagem de maquina, tanto para disco 
como para fita magnetica, e alguns Mo- 
nitores informant ainda os enderecos 
micial, final e de execucao (entry-point) 
de um programa recem-carregado. 

A EXECUQAO CONTROLADA 

Examinemos, mais acuradamente, a 
execucao controlada que e oferecida pe- 
los Monitores, e que pode ser lmplemen- 
tada de duas maneiras. 

Na pnmeira delas, o controle e possi'- 
vel porque o Monitor permite definir 
pontos de interrupcao dentro do progra- 
ma que estamos executando com o au- 
xflio do mesmo. Quando um breakpoint 
€ encontrado durante a execucao do 
programa, o Monitor recupera o contro- 
le da situacao. Existem, portanto, duas 
situac<5es: uma delas e a execucao do 
programa em teste; a outra (quando o 
breakpoint e encontrado) e a execucao 
do Monitor. 

Desta forma, coexistem dois grupos 
de valores que, alternadamente, serao 
utilizados pela UCP, ora executando 
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d programa em teste, ora executando o 
Monitor. Estes valores a que nos refen- 

, bk)s sao os contetidos dos registros da 
UCP. Pense no seguinte: quando um 

Breakpoint 6 encontrado, o Monitor re- 

Icupera o controle e os registros da UCP 
sao utilizados para executar o Monitor. 
Nestas condicoes, o Monitor deve ser 
capaz de armazenar os valores contidos 
nos registros no momento da mterrup- 
9ao. antes que os mesmos sejam carrega- 
dos com os valores adequados a execu- 

| $ao do Monitor. 

Isto implica na necessidade de uma 

Urea de armazenamento, onde o conteu- 

K> dos registros do programa em teste 
possam ser guardados. £ a exjstencia 

|desta area de armazenamento que per- 
mite executar o programa em teste com 
uma certa situacao de dados nos regis- 
tros. (0 comando do Monitor que per- 

■nite a visuahzacao e alteracao do con- 
teiido dos registros acessa esta area de 
armazenamento para reahzar sua fun- 
cao.) Note-se que, antes de. miciar a 
execucao do programa em teste, o Moni- 
tor carrega os registros da UCP com os 

Ualores contidos na drea de armazena- 
mento dos registros do usu2no. Por ou- 
tro lado, quando o breakpoint e encon- 
trado, o conteiido dos registros da UCP 

\i guardado na area de armazenamento 
antes do Monitor assumir o controle, 
de modo a ficarem disponi'veis para o 
usuano. 

Um inconveniente deste tipo de exe- 

jcucao controlada reside no seguinte: 
durante a execucSo do programa em tes- 
te, o Monitor nao tern controle sobre a 
mesma, enquanto o breakpoint nao for 
encontrado. Se o programa entrar em 
loop, teremos de ressetar o computador, 
pois nao ha controle sobre a execucao; 
existe controle somente quando o 
breakpoint e encontrado. 

Outro problema ocorre quando ten- 
tamos analisar uma rotina da ROM. Nes- 
te caso, nao e" possi'vel definir um break- 
point, ja que esta defimcao implica em 
colocar uma instrucao especial no ende- 
reco especificado pelo usuano. o que 
nao pode ser feito em uma mem6na 
ROM. 

A EMULACAO 

segundo modo de implementar a 
execucao controlada permite executar 
o programa enquanto se momtora dma- 
micamente o conteiido dos registros e 



de partes da memoria RAM. A isto se 
denomina Trace: as instrucoes sao exe- 
cutadas em camara lenta, permitindo ao 
usuano uma visao detalhada das 
acoes do programa (pode-se ajustar a 
velocidade do Trace dentro de certa fai- 
xa de valores), com as instrucoes visuali- 
zadas em mnemonicos e em hexadeci- 
mal. 

Pode-se tambdm executar o programa 
instrucao por instrucao, isto e\ passo a 
passo (single step), com total controle. 
Alem disso, existem Momtores que per- 
rmtem a execuclo com duas telas: uma 
do programa, onde a acao do mesmo se 
desenvolve, e uma do Monitor, onde as 
instructs sao apresentadas e o conteii- 
do dos registros visualizados. podendo- 
se mudar de uma tela para outra com o 
simples apertar de uma tecla. Estas duas 
telas tambe"m podem ser apresentadas de 
de uma vez so, repartindo-se o display 
entre as duas. Numa outra opcio. pode- 
se executar passo a passo ou em camara 
lenta de maneira transparente, isto e, 
embora o Monitor controle a execute 
na tela s6 visuahzamos a a<;ao do progra- 
ma em execucao. As sub-rotinas podem 
ou nao ser executadas em profundidade, 
sendo o ni'vel ajustado pelo usuano. 

Este tipo de execucao controlada e 
denominado de Emulacao, no qual as 
instrucoes sao executadas de maneira m- 
terpretativa e o Monitor mantem con- 
trole em todos os momentos. O Moni- 
tor possui uma area especial de execu- 
cao de instrucoes, onde a instrucao a ser 
executada e" copiada. Pore"m, antes de 
ser efetivamente executada, ela sofre 
uma interpretacSo: se for uma instrucao 
de desvio (incondicional, condicional ou 
relativo), apenas simula-se a sua execu- 
cao e alteram-se os registros do usuano 
para refletir a nova situacao. Se for uma 
chamada ou um retorno de sub-rotina. 
manipula-se de modo a manter-se efeti- 
vamente o controle antes de executa-la 
de fato. As outras instrucoes sao execu- 
tadas a partir da area especial e o con- 
trole retorna ao Monitor sem haver ne- 
cessidade de breakpoints. 

Este tipo de execucao e preferivel 
quando as rotinas ou programas assim 
executados nao possuem tempos criti- 
cos, como ocorre em acesso a discos, 
por exemplo. Para testar este tipo de ro- 
tina, a execucao com breakpoint e pre- 
ferivel, pois se evita o tempo consumido 
na interpretacao da instrucao e a execu- 
cao se faz a maxima velocidade. 



Se a intencao 6 aprender a programar 
em linguagem de maquina. este tipo de 
execucSo controlada e preferivel aos 
breakpoints. Usando a EmulacSo pode- 
se inclusive analisar programas gravados 
em ROM. Normalmente, quando se mi- 
cia a execucao com um Monitor deste 
tipo, a tela e preenchida com grande 
mimero de informacoes, permitindo 
controle total sobre a execuclo. A ins- 
trucao a ser executada e" mostrada em 
hexadecimal e em mnemonicos e existe 
uma parte da tela onde a acSo do pro- 
grama em analise se desenvolve, enquan- 
to que na outra parte e visualizado dina- 
micamente o conteiido dos registros da 
UCP. 

OUTROS COMANDOS 

Embora seja menosfrequentcalguns 
Momtores oferecem comandos para ant- 
me'tica hexadecimal e conversao deci- 
mal-hexadecimal. Outra caracteristica 
mteressante e a relocabilidade dos Mom- 
tores, isto e, pode-se executar o Monitor 
em qualquer parte da memoria RAM. 
Isto e importante porque evita conflitos 
de mem6na quando o programa a ser 
anahsado ocupa a mesma regiao da 
RAM que o Monitor. (Existe um coman- 
do que reloca o Monitor para qualquer 
regiao da RAM.) 

Em funcao da Emulacao que alguns 
Momtores oferecem, podem-se disassem- 
blar programas para o video e, opcional- 
mente, para a impressora. Ale'm disso, 
sao encontraveis tambem os seguintes 
comandos: 

- C6pia de blocos de dados entre dois 
enderecos da memoria. 

- Uso das portas de E/S para entrada e 
saida de dados. 

- Pesquisa e substituicao de bytes e en- 
dere?os. 

- E/S peia interface RS232C. 

- Calculo de checksum (soma de con- 
trole) de blocos de memoria. 

- Preencher blocos de memoria com 
um determinado byte. 

- Miiltiplos breakpoints. ■ 



Maun'cio Baduy 6 Engenheiro Eletrdnico for- 
mado pela Escola Polite'cnica da USP. em 
1976. £ professor de Introdupao & Computa- 
p8o na Faculdade de Engenharia de Ituiutaba, 
MG, ale'm de ocupar o cargo de SdcioGerente 
da firma mineira Sigma - Sistemas e Compu- 
tadores L tda. 
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SUPRIMENTO E COISA SEREA 

• Matenha o seu computador bem alimentado adquirindo produtos de qualidade consagrarta 

• Fila Mag netica 600 1200 e 2400 Pes 

• Fita CARBOFITAS p/lmpressoras Globus M 200 - B 300/600 

• Fita p/lmpressoras: Elebra. Digilab. Diablo. Centronicetc. 

• Cartucho Cobra 400 

• Pastas e FormulariosContinuos. 



Discos Magn6licos 5 Mb. 16 Mb. 80 Mb etc 

Diskettes 5 1/4. e 8 Polegadas — Simples e Dupla Face 

ETIQUETAS PIMAC0 -PIMATAB 



AV PRESI0ENTE VARGAS, 482 -GR 207 - TELS (021) 263-5876 - 253-1120 - RJ 
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Para ajuda'-lo na escolha, um resumo das principals caracteristicas dos 
DOS para os micros compatfveis com o TRS-80 1 e III. 



DOS: um para cada usuario 



Joao Henrique Volpini Mattos 



B~| oa parte dos microcomputado- 
res nacionais sao compati'veis 
t com os famosos micros amen- 

canos, n RS-80 modelos I e III da Radio 
Shack (figura 1), e quando adquindos 
na configuracao com discos, vem nor- 
malmente com um DOS baseado no 
TRSDOS que, venhamos e convenha- 
mos, nao 6 um dos melhores DOS exis- 
tentes. 

Um DOS (Disk Operating System) 
nada mais 6 do que um programa que 
controla a operacao dos computadores 
que utilizam discos. A grosso modo, o 
DOS dos micros nacionais consiste de : 

• um programa executivo 

• vanas rotinas auxiliares do sistema 

• uma bibhoteca de comandos 

• alguns programas utilitanos 

• uma extensao ao BASIC residente 

O programa executivo e carregado na 
RAM logo que o computador e ligado e 
um disco com o DOS e" colocado no dri- 
ve 0, ficando armazenado na memoria 
ate 1 que o computador seja deshgado. 
Ele inclui algumas rotinas do sistema, 
tabelas de enderecos, apontadores e con- 
troladores de entrada e saida. 

As rotinas auxiliares do sistema con- 
tent vanas rotmas e comandos que sao 
carregados somente quando necessano. 
Estas rotinas sa"o sempre carregadas so- 
bre uma mesma drea da mem6na do 
computador. Quando o DOS acaba de 
executar uma rotina, ele entra com a ro- 
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tina seguinte, superpondo-a a primeira 
num processo conhecido como overlay. 
Este tipo de procedimento gasta menos 
mem6na do computador, mas por outro 
lado faz com que o processo seja um 
pouco mais lento, devido ao tempo de 
carga destas rotmas. 

A biblioteca de comandos (aqueles 
que aparecem no video quando entramos 
com o comando LIB) cont^m as rotinas 
necessanas a execucao da maioria dos 
comandos do operador. £ gravada numa 
determinada drea da mem6na mas pode 
ser apagada pelos programas utilitanos. 
Para recarreg£-la, basta entrar com al- 
gum dos comandos da biblioteca. 

Os utilitanos sao programas que ser- 
vem para propositos especificos, tais 
como: copiar um disco (BACKUP), co- 



piar um arquivo de um disco para outro 
(COPY) ou formatar um disco (FOR- 
MAT). 

A extensao da linguagem BASIC c 

um programa que, quando passado para 
a memona. adiciona vanos comandos ao 
BASIC residente, permitindo, inclusive, 
o acesso a arquivos em disco. 

COMO ESCOLHER DOS? 

Na hora de escolher o DOS, creio que 
os fatores mais importantes a serem le- 
vados em consideracao senam: 

• velocidade de operacao 

• utilitanos fornecidos 

• facihdades no manejo 

• documentacao 

• compatibUidade com outros DOS 

• preco 
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A ordem de importance destes fato- 
res vai depender exclusivamente do 
■suano. 

Todos os DOS que a seguir anahsare- 
mos sao amencanos (que me perdoem 
os xenofobos, mas simplesmente nao 
existe DOS desenvolvido no Brasil para 
esta classe de micros) e embora eles 
compatibilizem os modelos I e III, deve 
ser observado que um disco gravado no 
modelo III s6 podera* ser lido pelo mo- 
delo I se este tiver um controlador de 
densidade dupla e drive de 40 tnlhas. 
Vejamos um a um. 



• DBLDOS 



DBLDOS e essencialmente o 
TRSDOS alterado para aceitar densida- 
de dupla no modelo I. £ comerciahzado, 
juntamente com um controlador de 
densidade dupla, pela Percom Data 
Corp. (11220 Pagemil Road, Dallas, 
TX75243, USA) e custa em torno de 
US$170 (devido ao fato de vir com um 
componente eletronico - o controlador 
- ele tern sua importacao proibida). 

£ quase totalmente mcompati'vel 
com os outros DOSs, nao apresentando 
diferen9as significativas sobre o 
TRSDOS ongmal. Nao vale a pena, por- 
tanto. nos aprofundarmos sobre ele. 



• DOSPLUS3.4 



£ comerciahzado pelo Micro System 
Software (5846 Funston St. Hollywood, 
FL 33023, USA), custando cerca de 
US$ 150. 

Ele pode ler um disco formatado 
pelos outros DOSs (exceto o DBLDOS), 
reconhecendo automaticamente a den- 
sidade do disco que esta sendo lido. £ 
um sistema operacional recomendado 
para quern planeja mais tarde partir para 
uma configuracao com discos Winches- 
ter, pois 6 praticamente identico ao seu 
lrmao mais novo DOSPLUS 4.0, desen- 
volvido para configura96es com este ti- 
po de disco (o preco 6 mais ou menos 
US$ 1.900, com um disco de 5 Mbytes 
e importacao proibida). 

O DOSPLUS tern repeticao automa- 
tica da tecla que estiver sendo pressiona- 
da; repeticao do ultimo comando ("/"); 
possibilidade de execucao de arquivos 
de comandos (DO); compatibihza os 
modelos I e III desde que o primeiro te- 
nha dnves de densidade dupla; perrmte a 
leitura de um disco gravado em densida- 
de simples no modelo I por um modelo 
III e pode formatar discos de 40 tnlhas 
em drives de 80. 



Alguns comandos da bibhoteca de 
comandos sao diferentes dos do 
TRSDOS. Por exemplo, o comando DIR 
6 equivalente ao DIR(A) do TRSDOS, 
enquanto que o CAT 6 que 6 equivalen- 
te ao DIR. Atrav^s do DOSPLUS 
podemos redirecionar uma saida do 
video para a impressora e vice-versa 
(FORCE) ou entao duphcar uma 
saida do video na impressora (JOIN). 

Como utilitanos de uso geral temos: 
um Spooler para a impressora (um 
Spooler 6 um programa que acumula os 
dados a serem enviados para a impresso- 
ra num buffer de mem6na,hberando a 
UCP do computador para outras fun- 
c5es - quern costuma tirar hstagens de 
programas sabe como 6 enervante ficar 
esperando que a impressora libere o 
computador); um COPY para equipa- 
mentos com apenas um drive; um pro- 
grama que faz a compressao de progra- 
mas BASIC gravados no disco 
(CRUNCH) e um outro que examina os 
arquivos em disco (DISKDUMP) ou en- 
tao os altera (DISKZAP). 
Podemos ainda recuperar arquivos 
deletados (RESTORE), transferir pro- 
gramas SYSTEM da fita para o disco e 
tirar copias multiplas de arquivos 
(TRANSFER). 

Com relacao ao BASIC, o DOSPLUS 
oferece a possibilidade de abreviarmos 
vanos comandos; perrmte mover e duph- 
car hnhas de programa; aceita TAB em 
LPRINT aldm de 64 colunas; per mite o 
controle de entradas no video 
(INPUT @ ); ordena vetores matnzes 
etc. Aldm disso, o DOSPLUS fornece 
um BASIC compnmido (TBASIC) que 
nSo e" tao poderoso como o outro, mas 
serve para executar a maioria dos pro- 
gramas, ocupando menos espaco na me- 
m6na do computador. 

Seu manual de 240 paginas 6 bastan- 
te detalhado, apresentando mclusive 
uma secSo que descreve os pontos de 
entrada e saida das rotinas do DOS e do 
DCB (Device Control Block). 



• LDOS5.1 



O LDOS 6 uma evolucao do extinto 
VTOS. £ comerciahzado pela Logical 
Systems Inc. (11520 N. Port Washing- 
ton Rd., Mequon, WI 53092, USA) e 
seu pre^o gira em torno de US$ 130. 

Sem duvida, tern o melhor e mais 
bem escnto manual entre os DOSs exis- 
tentes, e os proprietaries registrados re- 
cebem tnmestralmente uma revista - 
The LDOS Quarterly - contendo varias 
informacSes, alteracoes e utilitanos. 

Para que o LDOS possa ser emprega- 
do com densidade dupla, 6 necessano 
usarmos o utihtano PDUBL, o qual deve 
ficar permanentemente armazenado no 
topo da memona do computador. Utih- 



zando o comando SYSGEN, esta confi- 
guracao ficara" gravada no disco, de mo- 
do que sempre que voce coloca'-lo no 
drive e apertar o RESET, o PDUBL sera - 
carregado. Ha, no entanto, a possibilida- 
de de que o PDUBL possa cnar alguns 
problemas com outros programas que 
tamb^m residam no topo da mem6na. 

A bibhoteca de comandos do LDOS 
6 similar a dos outros LDOSs, apenas 
com destaque especial para o comando 
CONV, que perrmte a leitura de um 
disco gravado pelo TRSDOS do modelo 
III por um modelo I. Por sinal, 6 o unico 
DOS que oferece esta fa alidade. 

Como utilitanos, o LDOS oferece um 
Spooler para a impressora; a possibihda- 
dade de copiar arquivos por data ou ti- 
po, inclusive entre drives de densidades 
diferentes; facihdades para a utihzaca"o 
de disco Winchester; um programa para 
comunicacSo entre micros (LCOMM) 
atrave's da interface RS-232, e outro 
(CMDFILE) para transferencia de pro- 
gramas SYSTEM da fita para o disco, os 
quais podem ser, ao mesmo tempo, al- 
terados. 

Uma das caracten'sticas mais podero- 
sas do LDOS e" o seu Job Control Lan- 
guage (JCL). Quern ja" usou computado- 
res de grande porte sabe como pode ser 
util um JCL. Os outros DOSs normal- 
mente oferecem os comandos CHAIN 
ou DO que permitem o encadeamento 
de vinos comandos do DOS, mas ne- 
nhum deles oferece um JCLverdadeiro. 

O JCL do LDOS 6 uma hnguagem 
compilada que pode manipular decla- 
racoes condiaonais, expressoes 16gicas, 
vandveis etc. Ele permite que voce cons- 
trua macros nos seus programas, ou seja, 
basta espeaficar o nome do macro que 
o LDOS automaticamente realiza uma 
se'rie de operacOes complexas. 

O BASIC do LDOS, conhecido como 
LBASIC, nao 6 tao poderoso quanto o 
BASIC dos outros DOSs, portm permite 
a execucao passo a passo de programas 
e ainda oferece facihdades no que tange 
a depuracao dos mesmos. Com relacao £ 
linguagem propnamente dita, o coman- 
do RESTORE foi alterado, permitindo 
especificar o mimero da linha que o 
ponteiro dos DATAs deve apontar. £ 
possivel tambe'm ordenar vetores e enca- 
dear programas sem perder as variiveis 
na mem6ria. 



MULTIDOS 



O MULTIDOS foi escrito por Vernon 
Hester (Vernon Hester e Kim Watt sao 
considerados os papas da mampulacao 
de discos em linguagem de miquina, 
tendo cada um deles vanos programas 
de sucesso nos EUA). £ comercializado >y 
pela Cosmopolitan Electronics Corpora- j£ 
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tion (P. 0. Box 89, Plymouth, Michi- 
gan 481 70, USA) e 6 o DOS mais bara- 
to que existe no mercado (aproximada- 
mente US$ 100). Mesmo assim, mcor- 
pora vanas caracteristicas que os seus 
concorrentes mais caros nao possuem. 

Para comecar, £ o unico DOS total- 
mente compativel com os demais. Isto 
quer dizer que ele pode ler um disco for- 
matado por qualquer DOS, coisa que ne- 
nhum outro faz. Outro detalhe impor- 
tante 6 o fato de que se voce remover o 
disco do drive e o DOS tentar acessar 
alguma das rotinas do sistema (obvia- 
mente na"o vai conseguir), voce nSo per- 
derd o controle do computador. Nos de- 
mais DOS, quando isto ocorre, o com- 
putador fica completamente travado. 

Outras caracteristicas de menor im- 
portance sao: repeticSo automdtica do 
ultimo comando (basta apertar a tecla 
ENTER), e a possibilidade de leitura e 
gravacio do cassete (CLOAD, CSAVE, 
SYSTEM) sem a necessidade de desligar 
e hgar o rel6gio de tempo real (CMD'T" 
e CMD"R") - isto porque o MULTI- 
DOS reconhece os comandos do cassete 
e interrompe o rel6gio automaticamen- 
te, acionando-o ap6s completada a ins- 
truc^o. 

Apesar das vantagens oferecidas, 
ocorre um problema durante as opera- 
goes de leitura/gravacSo no disco: ele 
acusa uma incidencia de erros do tipo 
DATA RECORD NOT FOUND DU- 
RING READ maior que os outros. Ao 
que parece, isto esti hgado ao numero 
de vezes que o MULTIDOS faz a venfi- 
cacao das opera goes de leitura e grava- 
9I0 (4 contra 10 dos outros DOS). 

Com relacSo aos comandos da bibho- 
teca, o MULTIDOS apresenta muitos 
comandos ale"m dos existentes no TRS- 
DOS. A partir dele, n6s podemos desar- 
mar a tecla BREAK; cnar e executar ar- 
quivos DO; especificar o numero de co- 
lunas por linhas e estas por pagina da 
impressora (FORMS); selecionar um ca- 
rater qualquer para o cursor, inclusive 
especificando se ele deve ficar piscando 
ou nao (KEYBRD); desviar uma saida 
da impressora para o video e vice -versa 
(ROUTE); duplicar uma saida do video 
na impressora e vice-versa (LINK); pro- 
teger o topo da memdna (TOPMEM); 
e mais alguns comandos. 

Como utilitanos do sistema, o MUL- 
TIDOS oferece um BACKUP que per- 
mite tirarmos c6pias com um unico dri- 
ve e ao mesmo tempo alterar o numero 
de tnlhas do disco-destmo; um COPY 
que proporciona a c6pia de um arquivo 
usando apenas um drive, qualquer que 
seja a formatacio do disco-fonte e do 
disco-destino; e um FORMAT que pode 
formatar um disco em densidade simples, 
dupla ou P (do DBLDOS). 



Ja como utilitdnos de uso geral te- 
mos: um Editor/Assembler; um explo- 
rador da RAM que localiza palavras de 
um ou dois bytes na mem6ria ; um utili- 
tino graTico que permite a entrada de 
caracteres grancos diretamente do te- 
clado; um Spooler para a impressora e 
um utilitario para manipulacio de ar- 
quivos (VFU - Versatile File Utility). 

Em relacao ao BASIC, o MULTIDOS 
tern o melhor BASIC dentre os ofereci- 
dos pelos DOSs (chamado SUPER- 
BASIC), ale"m de um outro utilizado na 
programacSo e depuracSo de programas, 
chamado BBASIC. 

O SUPERBASIC 6 o que menos ocu- 
pa espaco na mem6ria, deixando cerca 
de 40000 bytes livres para voce. Isto 
acontece porque ele trabalha em regime 
de superposicSo (overlay). Com ele po- 
demos recuperar um programa BASIC 
apos apertarmos o bota"o de RESET ou 
o comando CMD"S" (volta para o DOS) 
atrave's do comando BASIC* mesmo 
que o programa tenha sido deixado por 
outro DOS (BASIC!) ou que desejemos 
retornar ao BASIC residente (BASIC #). 

Adicionalmente, podemos falar do 
comando Pn, que mostra no video uma 
determinada pagina do programa; da fa- 
cilidade de abreviar vanos comandos; da 
capacidade em renumerar o programa ao 
todo ou em parte, procurer strings den- 
tro de um programa e mudar nomes de 
vanaveis. Existe ainda uma se'rie de co- 
mandos do tipo CMD"X" que: compri- 
mem o programa sem retirar os comen- 
tanos (CMD"C"), mostram no video o 
ultimo erro ocorndo (CMD"E"); zeram 
todos os elementos de uma matnz 
(CMD"K"); deletam uma matnz de me- 
mona do computador (CMD"L"); mo- 
vem uma linha de programa (CMD"M"); 
duphcam uma linha de programa 
(CMD"N"); abrem um buffer adicional 
de arquivo (CMD"0"); ordenam uma 
string ou vetor (CMD"Q"); e mostram 
no video todas as vanaveis escalares e 
seus valores (CMD"V"). Nao podemos 
esquecer de mencionar o comando 
NAME, que carrega um programa sem 
perder as vans' veis presentesnamem6na. 

O BBASIC nada mais £ do que um 
SUPERBASIC incorporado a um geren- 
aador de programas. Ele proporciona a 
execucao passo a passo do programa, a 
inspecao de um grupo predefinido de 
variaveis, alem de incluir um TRACE 
melhorado. Por causa disso, o BBASIC 
ocupa um pouco mais de mem6na do 
que o SUPERBASIC. 

O manual na"o 6 muito detalhado (70 
pdginas) e exige que voce ja" tenha uma 
razoavel experiencia com o TRSDOS, 
pois ele explica apenas as diferencas en- 
tre o MULTIDOS e o TRSDOS. 



• NEWDOS80 2.0 



Comercializado pela Apparat, Inc. 
(4401 So. Tamarac Parkway, Denver, 
CO 80237, USA), o NEWDOS80 ver- 
sSo 2.0 custa em torno de US$ 150, 
sendo juntamente com o DOSPLUS 
um dos DOSs mais caros do mercado. 

Sua formatacio e" totalmente diferen- 
te dos outros DOSs, pois nSo utiliza o 
conhecido conceito de granulos (um 
granulo 6 a menor parte do disco que 
pode ser alocada para um arquivo e 
equivale a 1/2 trilha no modelo I), mas 
am de lumps. E o que £ um lump? Nem 
o manual explica. 

Apesar disso, ele pode ler discos for- 
matados pelos outros DOSs, desde que 
seja reconfigurado com o comando 
PDRIVE cada vez que um disco com 
formatacSo diferente for lido. Uma van- 
tagem oferecida € que os discos forma- 
tados pelo NEWDOS80 sSo lidos tanto 
pelo modelo III como pelo I com densi- 
dade dupla. 

Com relacao a sua biblioteca de co- 
mandos, que 6 bastante grande, pode- 
mos destacar as facilidades de:desarmar 
a tecla BREAK; criar arquivos de co- 
mandos encadeados (DO); enviar o con- 
teudo do video para a impressora (JKL); 
proteger o topo da mem6ria (HIMEM); 
mostrar uma mensagem no video e 
aguardar ate' que o ENTER seja pressio- 
nado (PAUSE) (para utilizacao em ar- 
quivos DO ; imprimir um arquivo na im- 
pressora (PRINT); repetir o ultimo co- 
mando (R); desviar uma saida do video 
para a impressora e vice-versa (ROUTE). 

Ele apresenta ainda um mini-DOS, o 
qual permite a execuca"o de todos os co- 
mandos da biblioteca exceto o APPEND, 
CHAIN, COPY e FORMAT, ocupando 
menos espaco no disco. 

A respeito dos utihtarios, o NEW- 
DOS80 oferece o popular SUPERZAP 
que altera os arquivos no disco; uma ver- 
sao modificada do Editor/Assembler da 
Radio Shack; um Disassembler que en- 
via o programa em mnemomcos Z-80 
para o disco e para a impressora e/ou vi- 
deo simultaneamente; um utilitaiio que 
transfere programas SYSTEM da fita pa- 
ra o disco LMOFFSET) mesmo que o 
programa transferido ocupe a area de 
mem6na utilizada pelo DOS; um 
Spooler para a impressora (ASPOOL);e 
um utilitano para criacSo e edicSo de 
arquivos CHAIN e DO (CHAINBLD). 

De maneira geral, o BASIC do NEW- 
DOS80 £ quase ta"o bom quanto o do 
MULTIDOS. Com ele podemos desar- 
mar a tecla BREAK; encadear e fundir 
programas (MERGE) que nfo estejam 
gravados em ASCII; determinar as li- 
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ACbmputique 
aoresenta onovo sucesso da 

Digitus. 




O micro com interface para video colorido. 

Com essa inovacaoa Digitus amplia ainda maisaversatilidadeeaeficiencia dos 

seus equipamentos. 

O DGT 1000 tern configuracao basica de urn microcomputador, oferecendo total 

possibilidade de expansao para um grande sistema. 

Venha conhecer a nova estrela dos microcomputadores, na Computique mais proxi- 

ma de voce. 



CARACTERfSTICAS: 

• Microprocessador Z 80 de 2,5 mHz. 

• Memoria RAM de 16 kB, 48 kB ou 
64 kB. Expansao ate 4 unid.de discos 
flexiveisde5 1/4". 

• Teclado alfa numerico de 56 teclas. 
com maiusculas e minusculas. 

• Teclado numerico independente. 

• Seis conectores para expansao. 

• Video independente. encaixado a 
CPU. 



• Video defosforoverdee branco.Gra- 
fico a cores em alta resolucao ( 256 h x 
192 v), 1 5 cores e transparencia. 

• Sintetizador de voz. 

• Interface paralela para impressorati- 
po Centronix. 

• Interface DGP/ M totalmente com- 
pativelcom CP/M. 

• Linguagens: Assembler, Cobol, For- 
tran, C Basic, PL I. 



Sao Paulo: 

m. Angelica. 2578 
I Fone 231.3922 



(ompubque 

O micro sem segrecios. 



Rio de Janeiro: 

Av. N. Sra.de Copacabana, 1417 
L. 303/304 -Fone 267. 1093 



Campinas: Pocos de Caldas: 

R. Conceicao. 224 R. Prefeito Chagas. 252 
Fone 32.6322 Fone 72 1. 58 10 



Curitiba: 

Av. Batel, 1750 
Fone 243.1731 



Fora dessas cidades 
ligue (01 1) 800.8880. 
A Computique paga. 
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nhas em que uma dada vanavel aparece 
(REF); apagar variaveis selecionadas da 
mem6na (CMD"F -ERASE") ou apagar 
todas as variaveis da mem6ria exceto as 
selecionadas (CMD"F - KEEP"); apagar 
todos os RETURNS e NEXTs abertos da 
pilha de enderecos de retorno (stack) 
do BASIC; deletar dinarrucamente linhas 
de programas; trocar o conteudo de 
duas variaveis (SWAP); executar o pro- 
grama passo a passo; recuperar um pro- 
grama deletado e ordenar vetores ou 
matnzes(CMD M 0"). 

Sobre o acesso a arquivos de dados, 
podemos dizer que o BASIC do NEW- 
DOS80 e" o mais poderoso de todos - 
cerca de 85 paginas do manual se dedi- 
cam exclusivamente a este item. Ale'm 
dos conhecidos acessos sequencial e ran- 
domico, o NEWDOS80 apresenta mais 
dois tipos: Marked Item (que se divide 
em tres subtipos) e Fixed Item (que se 
divide em dois subtipos). Estes acessos 
podem manipualr registros de ate" 4095 
bytes de comprimento, e embora sejam 
de diffcil compreensao para o miciante, 
nSo resta duvida de que sa"o bastante po- 
derosos. 

Infelizmente, o NEWDOS80 nSo re- 
conhece automaticamente a densidade 



dos discos lidos, mas a firma The Alter- 
nate Source (704N. Pensylvania Ave., 
Lansing, Michigan 48906, USA) vende 
um programa chamado DDSD que custa 
USS 20, possibihtando ao NEWDOS80 
o reconhecimento automdtico da densi- 
dade dos discos, sem termos que utilizar 
o comando PDRIVE a toda hora. 

Aos proprietaries registrados do 
NEWDOS80, a Apparat fomece gratui- 
tamente novas alteracoes do DOS a me- 
dida que forem sendo desenvolvidas. 

EM RESUMO 

Como voce pode observar, cada DOS 
tern seus pontos fracos e fortes. 
DBLDOS nao 6 compati'vel com os ou- 
tros. DOSPLUS tern o DISKDUMP, 
DISKZAP, e reconhece automaticamen- 
te a densidade dos discos. LDOS tern 
um excelente manual e oferece um bom 
apoio te'cnico ao usuaiio, fornecendo 
ainda um JCL poderoso. MULTIDOS 
e barato, compati'vel com os demais e 
tern um BASIC excelente. Entretanto, 
peca por apresentar alguns problemas de 
leitura/gravacSo. NEWDOS80 possui 
um Disassembler, um SUPERZAP e tern 
o melhor BASIC no que diz respeito a 



acesso a arquivos. Entretanto, n3o reco- 
nhece automaticamente a densidade dos 
discos. 

Sua escolha depended muito do tipo 
de aplicacSo a que se destina, mas quan- 
do adquinr um destes DOSs, nao se es- 
queca de menaonar: 

• o modelo do seu computador (com- 
pati'vel com Modelo I ou III?); 

• a densidade e mimero de tnlhas dos 
seus drives. 

Isto vai evitar que voce compre um DOS 
que n3o possa ser lido pelo seu drive. 

Com relacao a compra aqui no Bra- 
sil, creio nao ser muito facil encontra- 
los, mas com um pouco de esforco voce 
poderi obter sucesso. De qualquer for- 
ma, voce pode adquin-los em qualquer 
loja espeaalizada nos EUA. ■ 



Engenheiro Naval, terminando Pds-GmduacSo 
na COPPEAJFRJ, Joao Henrique Volpini Mat- 
tos tern cursos de CP/M, Assembler e FOR- 
TRAN pela UFRJ, COBOL pela NUCEMPRO, 
conhece SPSS e trabalha ha quatro anos com 
o BASIC (nao exclusivamente). Possui um mi- 
crocomputador D-8000 compati'vel com o 
TRS-80 Modelo I, com placa de CP/M. Atual- 
mente e" Assessor Te'cnico do Departamento 
de InformStica do SEN AC. 




Tire seu micro 
isolamento 



i § 



Agora que voce ja adquiriu seu micro e esta tirando 
partido de tudo o que ele pode fazer, saiba que isso e apenas 
o iiii<:i( >. 

Acoplando um modem UP 1200/n Parks ao seu 
aparelho, voce sai do isolamento e pode interligar seu 
microcomputador ao de um amigo ou banco de dados, 
atraves da linha telefonica, ampliando 
consideravelmente seu uso, seja para o trabalho ou lazer. 

De maneira rapida e eficiente, facil como dar 
um telefonema, voce podera copiar 
programas, aumentar seus dados de 
memoria, receber e transmitir as mais 
variadas informacoes, e ate jogar xadrez a ' 
distancia. De operacao simples, o UP 1200/n tem baixo custo de 
fimcionamento e manutencao e pode ser utilizado em linhas privativas ou discadas. 

De vida nova ao seu micro. Tire-o do isolamento com UP 1200/11 Parks: 
o modem da integracao. 



Parki - Equlpamentof Eletrftnico* Llda. 

Sao Paulo: Rua Correa Vasques. 51 • Fone (01 1) 549-4360 • tlx (OU) 23141 • B«lo Horizonte: Av. Afonso Pena. 941 

Fone (031) 226-5722 • Braaflla: CLRN 103 - Bloco A - Loja 37 - Fone (061) 255-0538 • Curitlba: Rua Carlos de Carvalho. 1766 

Fone (041) 232-1814 - tlx (041) 5406 • Porto Alejre: Av. Parana, 2335 - Fone (0512) 42.5500 - tlx (051) 1043 • Radfa: Av. Conselheiro 

Aguiar. 5025 - conj. 104 - Fonea (081) 325-21 23 e 325-2307 / Av. Norte. 3090 - Fone (081) 241.5309 • Rio da Janeiro: Av. Rio 

Branco. 245 - a/2102 - [one: (021) 220-2149 • Salvador: Av. Amaralina. 818 - sala 102 - Fone (071) 249-9744 e 247-6344. 
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NAO CUSTA NADA 
EXPERIMENIAR 



Sonar /Inspec. Voce 
precisa conhecer esta 
novidade na area de 
Processamento de Dados. 
Um servigo tao novo que 
nao ha nada parecido para 
fazer comparacao. Com um 
software sofisticado que vai 
facilitar sua vida. 

Imagine uma selecao 
quinzenal de literatura 
tecnica especial para voce. 



Quer um exemplo? 
Artigos internacionais com 
aplicacoes de software no seu 
campo. Ou com solucoes 
para problemas iguais aos de 
seus clientes. 

A lei do menor esforco vai 
deixa-lo encantado com o 
Sonar/Inspec. Voce vai ver. 



E se ainda restarem 
duvidas, o Cin lhe da dois 
meses de experiencia. Depois 
disso voce paga 5 ORTN's 
pela assinatura anual, 

Telefone para o Cin e peca 
material de inscriQao. Nosso 
numero e (021) 295-2232 
ramal 301. Se preferir, 
escreva ou envie um telex ao 
Cin. 




Rua General Severiano, 90 - Botafogo 

22294 - Rio de Janeiro - R J - Brasil 

Tel .: (021) 298-8545 - Telex (021) 21280 CNEN BR 






Veja o que voce pode fazer no CP-500 com o DISKZAP do DOSPLUS: 
modificar o conteudo de um disquete, personaliza-lo e, de quebra, criar monstrinhos\ 



DISKZAP para mudar 



Roberto Quito de Sant'Anna 




D~| entre os varios sistemas operacionais com os quais jd 
tive oportunidade de trabalhar no CP-500, o DOS- 
PLUS 3.4 e\ na minha opiniao, o mais versdtil e o de 

maior compatibilidade com o DOS 500/TRSDOS. Embora o 
NEWDOS seja talvez mais poderoso, o DOSPLUS 3.4 constitui 
uma valiosa aquisica"o para todo proprietdrio de CP-500, pois 
ale'm dos utilitdrios normalmente encontrados em todos os 
DOS (BACKUP, FORMAT etc.), este sistema operacional dis- 
poe ainda do DISKZAP - poderosa ferramenta que permite o 
acesso, a visualizacSo e ate - mesmo a modifi cacao byte por byte 
de qualquer setor de um disco, independente de seu nivel de 
protecao e de suas senhas. Com o DISKZAP 6 possivel entrar 
em qualquer arquivo e modificd-lo com a maior facdlidade, seja 
ele um programa em BASIC ou linguagem de maquina, um ar- 
quivo de dados ou ate* mesmo o pr6prio sistema operacional. 

Este artigo pretende dar informacOes a respeito da utiliza- 
cao desta ferramenta, concentrando-se no que o pr6prio Ma- 
nual do Usuino chama de coracao do DISKZAP, que e" a sua 
opcao DISPLAY. Ao final, uma aplicacSO pratica, atrave"s da 
qual serd demonstrado como personalizar um disquete com o 
DOS 500, substituindo o logotipo da Prol6gica por um dese- 
nho de livre cnacSo por parte do usuino, por suas miciais em 
letras gigantes ou por qualquer texto desejado - tudo limita- 
do, para maior simplicidade, a oito linhas de tela. ampitico 
"monstnnho" que abre este artigo 6 o que aparece em todos os 
meus disquetes modificados (voce ver£ como). 



E por falar em Manual do Usuino, desejo citar, de inicio, 
uma se'ria advertencia contida nas explicates sobre o DISK- 
ZAP: Por ser um poderoso editor de setores de discos, sua 
utilizacao sem a devida cautela pode vir a inutilizar um arquivo 
ou ate" mesmo todo o conteudo de um disco em fracao de se- 
gundos. Assim.e - importante usa"-lo em uma copia (backup) do 
disco que se quer modificar. manual lembra, com muita 
propnedade, que 6 o usuano - e nao o DISKZAP - quern mu- 
tiliza conteudos de disquetes... 

Para trabalhar com o DISKZAP a primeira providencia e", 
apos liucializado o DOSPLUS 3.4 , digitar DISKZAP < ENTER>; 
o que faz surgir a pergunta Number of Tracks? (Numero de 
Tnlhas?), a qual, para o DOS 500/TRSDOS, deve ser respondi- 
da digitando-se 40 < ENTER > ; se voce se distrair e nao entrar 
com o numero 40, basta teclar < BREAK >e a pergunta sur- 
gird novamente. Ap6s corretamente respondida, 6 feita a lim- 
peza da tela e surge o seguinte MENU: 

Model III Diskzap utility - Ver 3.1 
Copyright (c) 1981, Micro-Systems Software 

* Mode 
Zero 
Copy 
Print 
Verify 
Format 
Display 

Com as setas para cima e para baixo desloque o asterisco 
ate - que ele aponte a opcfo desejada, a qual serdl ativada pres- 
sionando-se < ENTER >. Neste ponto, se voce quiser voltar ao 
MENU, basta apertar < BREAK >. A tecla BREAK 6 a saida- 
padrao do DISKZAP e sua funca"o 6 interromper qualquer ope- 
racSo em andamento e retornar ao MENU. 

Como estamos interessados apenas na opcao DISPLAY, des- 
loque o * para a ultima linha e aperte <ENTER>. Imediata- 
mente surgirfo, uma a uma, as perguntas Drive?, Track? (Tri- 
lha?) e Sector?. Responda cada uma das perguntas com o va- 
lor hexadecimal correspondente seguido de < ENTER >e, em 
seguida, sera mostrada uma tela como esta: 

000000: 284D 6F64 656C 2049 202D 204D 6F64 6S6C (Model I - Model 

000010: 2049 4949 292E 2020 416C 736P 2060 616B III). Also male 

000020: 6S20 6365 7274 6169 6E20 7466 6174 2074 • certain that t 

000030: ... 

0O0OFO: 202E 2E2E 00A3 7028 003A 93FB 2020 2020 p(.:.. 

A organizacSo desta tela, que e" a visualizacao de todo o se- 
tor especificado, 6 a seguinte: a primeira coluna i o endereco 
do setor mostrado - os dois primeiros digitos representam a 
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(00 H), os dois seguintes o setor (00 H) e os dois ultimos 

00 H atd F0 H) o endereco hexadecimal do primeiro byte 

cada linha; as pr6ximas oito colunas sa"o o conteudo hexa- 

dos 1 6 bytes (cada coluna com 2 bytes ou 4 nibbles) 

lmha; finalmente, a direita de cada linha s2o mostrados 

6 caracteres ASCII correspondentes a cada um dos bytes 

linha, sendo que os caracteres sem correspondente ASCII 

lto na"o lmprimi'veis) sa"o representados por um ponto. 

* 1 6 bytes de cada linha sSo contados de a F e, para sim- 

r, a partir de agora passo a referenciar cada linha pelo va- 

hexadecimal do endereco de seu pnmeiro byte. No exem- 

na ultima lmha cujo primeiro byte tern o endereco F0, o 

F6 contem o hexadecimal 70, que corresponde a letra p. 

encontra uma relacffo completa de todos os caracteres 

S .U e seus c6digos decimais e hexadecimais correspondentes 

paginas 159/161 do Manual de Operaclo e Linguagem 

JIC da Proldgica. 

Apresentada a tela, voce dispoe das opco"es: 
; — para mostrar o pr6ximo setor; 

para mostrar o setor anterior; 

♦ - para mostrar o mesmo setor da pr6xima trilha; 
= - para mostrar o mesmo setor na trilha anterior; 
M - para entrar no modo de ModificacSo (MODIFY mode), 
o ultimo setor de cada trilha e o primeiro da seguinte 
uma parada com a mensagem Record NOT FOUND Du- 
Read. Continue?. Responda Y < ENTER > e a exibicao 
itinuara\ ou responda N e retome ao MENU. 
No modo de ModificacSo (M) surge um cursor superposto 
caracteres hexadecimais do primeiro byte da primeira h- 
- ele pode ser movido ao longo dos 256 bytes de toda a 
por meio das quatro setas. Posicionado o cursor sobre o 
que se quer modificar, o teclado passa a aceitar apenas 
icteres hexadecimais vilidos, os quais ira"o substituir os ca- 
;res da posicao que se esta" modificando. Tao logo se mtro- 
o segundo cariter, o cardter ASCII correspondente ao 
idecimal rece"m-introduzido substitui o anterior na posi- 
correspondente do campo ASCII a direita da linha e o cur- 
avanca uma 003580 (CUIDADO: ao ultrapassar o ultimo 
de uma linha o cursor retoma ao pnmeiro byte da mesma 
»a! Para passar a linha seguinte, somente usando a seta para 
co). 

Feitas todas as modificacSes, voce pode apertar < ENTER > 
escrever o setor modificado no disco ou < BREAK > para 
lular todas as modificacoes, mantendo inalterado o setor no 
Em ambos os casos, o setor especificado continua sendo 
strado, continuando vdlidas todas as opcoes (;,—,+,=, e 
' ou < BREAK > para voltar ao MENU. 

AGORA, A CRIATIVIDADE 

Vista a teoria, passemos a pratica. Para tanto, voce deve 

irocurar se familiarizar com os ja - citados codigos das paginas 

J59/161, com a tabela de conversSo decimal-hexadecimal das 

'jinas 166/167 e com a tabela de caracteres graTicos da pa- 

1a 1 57. A proposito dos caracteres graTicos, convem lembrar 

; cada posicao da tela e" constituida de seis blocos (pixels) 

icionados as potencias de dois, da seguinte maneira: 



1 


2 


4 


8 


16 


32 



Assim, para chegar ao c6digo do carater desejado, basta adi- 
)nar a 1 28 os valores correspondentes aos blocos que se quer 
tnder. Por exemplo: 





1 


2 


3 


4 


5 


6 


7 


8 


9 


10 




■ 




\ 


b 


V 

J 


V 


1 




\ 


■. 




k 










\ 


■ 


1 




ZE 










> 


1 


la. linha: 160-164-164-164-164-164-164-164-164-164 


2a. linha: 153-128-128-128-160-176-144-128-128-128 


3a. linha: 166-128-128-128-131-128-139-180-160-188 


4a. linha:153-128-128-128-128-128-160-186-135-171 



e 



Codigo 128 + 1 + 8 + 16 = 153 



Figura I - Parte do "monstrinho" 

O pr6ximo passo 6 tomar uma o5pia do layout do formato 
de tela da pagina 158 ou uma folha de papel quadriculado - a 
linica desvantagem desta 6 a perda de proporcao do desenho, 
uma vez que os blocos da tela na"o s3o quadrados - e, lembran- 
do da nossa (para simplificar) hmitacJo de oito linhas e que 
uma linha tern 64 caracteres... de asas a sua veia artistica! 
Uma vez pronto o desenho, centralize -o na tela, delimite as co- 
lunas e linhas ocupadas, conte os espacos necessdrios a esquer- 
da e, paaentemente, levante o codigo correspondente ao sim- 
bolo em cada posi55o. Por exemplo, o quadrante superior es- 
querdo de nossa ilustraca"o (o "monstrinho") ficana do jeito que 
esta na figura 1 . 

Convertendo todos os valores correspondentes as quatro li- 
nhas deste mesmo quadrante para o sistema hexadecimal, com 
o auxilio da tabela das paginas 166/167, e aproveitando para 
substituir as ocorrencias multiplas do codigo 1 28 (espaco ou 
bloco vazio) pelo codigo de compressao de espacos apropnado 
(193 = 1 espa?©, 194 = 2 espa50S etc. - ver pdgina 15 do ma- 
nual), teremos, finalmente: 



la. linha : A0-A4-A4-A4-A4-A4-A4-A4-A4-A4 

2a. linha : 99-C3-A0-B0-90-C3 

3a. linha : A6-C3-83-80-8B-B4-A0-BC 

4a. linha : 99-C5-A0-BA-87-AB 



Agora, hgue o seu micro, coloque um disquete com o 
DOSPLUS 3.4 no drive 0, outro com o DOS 500 no drive 1, 
aperte o botSo RESET e, ap6s carregado o sistema, tecle 
DISKZAP <- ENTER > ; mova o* ate a posicao DISPLAY, te- 
cle novamente < ENTER > e responda as perguntas com 40 
(Number of Tracks?), 1 (Drive?), (Track?) e F (Sector?). 
Observe bem a tela que estd sendo mostrada e identifique cada 
uma das 16 linhas e seus bytes, comparando, quando possivel, 
os valores hexadecimais com a representacao ASCII do lado w 
direito. ♦, 
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DISKZAPPARAMUDAR 



Voce vera a direita o logotipo da Prologica desmontado — 
note que ele comeca na hnha 30 e vai ate a E0; note ainda, nas 
posicoes B4, B5, B6 e B7 da linha BO, os hexadecimais 01 , 2C, 
F0 e 51, OS QUAIS NAO PODEM SER APAGADOS OU 
MODIFICADOS, sob pena de o seu disco ir para o espa$o. 
Feita esta inspecao, tecle M para entrar no modo de modifica- 
cSo, movimente o cursor com o auxflio das setas e modifique 
sua tela conforme a figura 2, com muita atenc,ao (para simph- 
ficar, nao mostramos a parte a direita do video com os caracte- 
res ASCII). 





OOOF30: 


0AD6 


A0A4 


A4A4 


A4A4 


A4A4 


A4A4 


A4A4 


A4A4 


000F40: 


A4A4 


A4A4 


A4A4 


0AD6 


99C3 


AOBO 


90C7 


BOBO 


OOOF50: 


C388 


910A 


D6A6 


C383 


808B 


B4A0 


BCBC 


B4A0 


000F60: 


9E81 


8281 


C2A2 


840A 


D699 


C5A0 


BA87 


ABBF 


OOOF70: 


83AF 


B0C5 


8891 


0AD6 


A6C5 


BEBF 


B2BA 


BFB2 


OOOF80: 


BABF 


94C4 


A284 


0AD6 


99C5 


8BAF 


B4B3 


B3B1 


O0OF90: 


BE8F 


81C4 


8891 


0AD6 


A6C5 


8A8C 


8E85 


808F 


000FA0: 


8C8E 


C5A2 


840A 


D689 


9898 


9898 


9898 


9898 


000FB0: 


9898 


9898 


012C 


F051 


9898 


9898 


9898 


9881 


000FC0: 


2020 


2020 


2020 


2020 


2020 


2020 


2020 


2020 


OOOFDO: 


2020 


2020 


2020 


2020 


2020 


2020 


2020 


2020 


000FE0: 


200D 































Apos terminar, confira cuidadosamente todasas a hnhas,ve- 
rifique novamente os bytes B4, B5, B6 e B7 e aperte - ENTER > 
para gravar o setor modificado no disco. Em seguida, coloque 
o disco com o DOS 500 modificado no drive e aperte 
RESET. Se tudo foi feito corretamente, o monstrmho estara" 
sornndo para voce... 

A unica coisa que a esta altura pode lhe parecer mistenosa 
e o hexadecimal 0A. que normalmente aparece seguido de D6 
(por exemplo. os bytes 30 e 31 da linha 30 e A5 e A6 da hnha 
A0). O codigo 0A. conforme pode ser visto na pagina 159 do 
manual, significa "Move o cursor para o comedo da proxima 
linha e apaga a linha", enquanto que o D6 (decimal 214) re- 
presenta a compressao de 22 espasos para centralizar a figura 
na tela. Creio que isto e suficiente e que, seguindo os passos 
apresentados. voce ja pode partir para o seu pr6pno desenho. 

Uma palavra final: a maior parte do que foi aqui exphcado, 
principalmente a modifica§ao do setor F da tnlha do DOS 
500. se aphca. integralmente, ao equivalente do NEWDOS cha- 
mado SUPERZAP e que e, na reahdade, muito mais poderoso 
do que o DISKZAP. A preference pelo DISKZAP fundamen- 
ta-se na sua maior simphcidade de utilizacfo para o fim pro- 
posto, e no fato de que o SUPERZAP nao permite a visuahza- 
cio dos caracteres graficos, no campo ASCII, a direita de cada 
hnha. ■ 



Roberto Quito de Sant'Anna 4 Engenheiro de Telecomunicagoes, for- 
mado pelo Instituto Mi I i tar de Engenharia. Professor da cadeira de In- 
formitica da Academia Militar das Agulhas Negras, desde agosto de 
1982 6 tambe'm colaborador da MICRO-MAXI Computadores e Siste- 
mas, como Anal is ta de Sistemas. 



Figura 2 




A maneira prat ica de planejar, acompanhar e revisar a operas ao de 
sua empresa e atraves do uso do BUSIN ESS-CALC. 

O BUSINESS-CALC e urn produto que permite ao empresario en- 
contrar solucoes rapidas para seu problema de processamento 
de dados; com f lexibilidade e simplicidade; com baixo custo; total 
dominio do usuario sobre o processo de calculo, prescindindo-se 
de qualquer conhec imen t o espec ifico de comput ador e processa- 
mento de dados. 

O que e o BUSINESS-CALC? E um produto composlo de um soft- 
ware e uma documentacao. 

SOFTWARE: Matriz eletronica de 254 linhas e 78 colunas progra- 
maveis diretamente pelo usuario, MATRIZ BUSINESS-CALC. 

REQUISITOS DO COMPUTADOR 
Sistema Operacional: SOM ou CPM 
Memoria minima: 32K 
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COMPUT EL - COMPUTADORES B 
TELECOMUNICACOES LTD A. 
AV. RIO BRANCO, 45/811 ■ RIO DE JANEIRO - 20090 
TEL: 283-1814 



computel - computel - computel -computel - computel - computel - computel 



38 



MICRO SISTEMAS. outubro/83 



Os principals centros comerciais 
do mundo tern como sua empresa oficial 
de exportagoes os Trade Centers. Dentro 
dessa nova filosofia do comercio inter- 
national um grupo de empresarios cons- 
tituiu 9 BRASIL TRADE CENTER, 
COMERCIO E PARTICIPAgOES, 
baseado na estrutura dos seus similares 
dos grandes centros, a qual se acrescen- 
tou a dinamica do Banque DAffaire 
frances. A ideia principal desse Banco de 
Negbcios, e, no exterior, vender Brasil 
e, aentro do Pais, fomentar o intercambio 
com o mercado internacional e oferecer 
uma serie de produtos e facilidades ao 
empresario e outras pessoas interessadas. 
Veja alguns exemplos: 




Banco de negocios 



BRASILTRADE CENTER 

Av. Epitacio Pessoa. 280 (esquina de Visconde 

de Piraja), Ipanema. Rio de Janeiro - RJ, 

CEP 22471, tels.: (021) 259-1299, 259-1499 e 259-1542. 



A BTC - Computadores e Video 
desenvolve e fornece programas 
aplicativos, cursos de BASIC (basico 
e avangado), entre outros, alem de uma 
completa assessoria em Informatica e da 
venda de maquinas, software e video. 






comercializa aparelhos de video-cassete, 

fitas, e possui atualmente o primeiro curso 

de Ingtes em video-cassete produzido no 

Brasil, com um aprendizado divertido 

e eficiente. Tambem 

encontram-se 

em desenvol- 

vimento diver- 

sos projetos de 

programas cultu- 

rais em vf dea 



A BTC - Viagens e Tbrismo 
promove viagens comerciais e 
turisticas, individuals e em pacotes, 
com toda a infra-estrutura dos maiores 
agentes de viagens (despachantes, 
passagens a6reas, traslados, tours, 
hospedagem, etc.), incrementando o 
turismo interno e o intercambio com 
investidores estrangeiros. Realiza, 
tambem, tours de ensino 

e desenvolvimento em- 
presarial para 
estudantes e 
empresarios, visitan- 
do os maiores centros de In- 
formatica (fabricas e empresas, entre 
outros) dos Estados Unidos e Japaa 

BTC - Inc. Empresa Promocao e 
Comercializacao em Miami - 
Fldrida - EUA. O BRASIL TRADE 
CENTER funciona com telex interna- 
cional, banco de dados e recepcionistas 
bilingiies, com escritbrios em Miami 
e no Rio de Janeiro, este localizado 
numa das mais valorizadas esquinas 
do Brasil e dotado de show-room para 
exposigao e lancamentos de produtos. 
Visite-nos. Estamos a sua disposigaa 



J 



Inicialize-se no Si sterna Operacional dos equipamentos compativeis com 
o ZX81 e conheca a "alma" do seu equipamento. 



Sistema Operacional 
do ZX81 (I) 



Renato Degiovani 



Ml uito se tem falado e escnto so- 
bre monitores, sistemas opera- 
cionais, assemblers etc. e sem- 

pre fica uma pergunta no ar: "Mas afinal 
o que eu, um simples usuano que nao 
pretende ser o mestre dos mestres, nem 
escrever a oitava maravilha do mundo 
em materia de programas, tenho a ver 
com tudo isso?" A resposta a essa per- 
gunta parece ser muito simples, e e 
mesmo: nao tem nada. 

Mas, se o que se procura i a compre- 
ensao e a integracao entre o usuano e o 
computador; se a pretensao e estabele- 
cer um "dialogo franco" com a maquina 
e ainda se quer que o computador nao 
fique deshgado, encostado num canto 
qualquer, por medo do que possa acon- 
tecer quando a tela do video comecar a 
funcionar, entao s6 ha um caminho: co- 
nhecer e entender o Sistema Operacio- 
nal do micro que estivermos utilizando, 
sem preconceito de cor, raca, rehgiao, 
classe ou fabncante. 

Isto porque o Sistema Operacional e 
virtualmente a alma do computador 
(materialmente traduzida na forma de 
um programa Assembler), e um equipa- 
mento sem ele 6 o mesmo que um ser 
humano sem personahdade; sem passa- 
do, presente e futuro; sem reahdade e 
sem experience de vida. computador 
sem o Sistema Operacional e" apenas um 
amontoado de componentes eletronicos 
sem utilidade alguma. 



O NASCIMENTO 

Imaginemos que o micro esta desh- 
gado. Tudo nele e estatico:as resistencias, 
os capacitores, o clock, enfim.tudo como 
uma grande cidade antes do nascer do 
dia: sem movimento, sem barulho e sem 
vida Sistema Operacional tambem es- 
ta la posicionado na ROM e pronto pa- 
ra "nascer" ao simples toque humano. 
No momento em que o mterruptor da 
corrente eletnca e acionado, tem mi'cio 
um frenetico movimento de eletrons por 
toda a maquina. nosso Sistema Opera- 
cional entao, 6 "convocado" a partici- 
par desse processo e sua primeira instru- 
cao 6 executada: a instrucao cujo ende- 
reco e zero. 

Antes de prosseguirmos, e" preciso re- 
lembrar algumas coisas a respeito da 
UCP. A Z80A, que e o coracao do com- 
putador, batendo numa frequencia de 
aproximadamente 4 MHz. pode endere- 
car 65536 bytes, ou seja. a UCP s6 pode 



manipular 64 K de memona, seja ela 
RAM, ROM, PROM ou EPROM. Isso 6 
feito na forma de enderecos (de a 
65535) e cada um desses enderecos con- 
tern um byte que sera manipulado coipo 
instrucao Assembler; como dado de lei- 
tura; como elemento de um programa 
em BASIC; ou como resultado de ope- 
racoes matema'ticas ou logicas. Tudo 
isso na cadencia do clock de 4 MHz, isto 
e: tique-pega um byte no endereco X; 
taque-soma com o valor Y; tique-colo- 
ca o resultado no endereco Z; taque... 

Voltando ao Sistema Operacional, 
a primeira instrucao que € executada 
tem o endereco zero e faz parte da mi- 
ciahzacao do sistema. processo todo e 
representado desta forma na figura 1. 

A primeira instrucao (D3 FD) nao 
tem muita importancia a ni'vel de pro- 
gramacao do usuano. Mas a segunda ins- 
trucao Assembler executada e de signifi- 
cado fundamental para o equipamento: 



enderego 


codigo de 

maquina 


mnemonico 


comentario 


0000 
0002 
0005 


D3 FD 
01 FF 7F 
C3 CB 03 


OUT (FD) ,A 
LD BC,7FFF 
JP 3CB 


LET BC=32767 
GOTO 971 


Figura 1 
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grava o registrador BC com o supos- 
» endereco mais alto da mem6na. 
£ importante lembrar que o projeto 

Sistema Operacional da Sinclair - 

So para os TKs, CPs e NEs - parte 

pressuposto que havera, no maximo. 

expansao de memona de 16 K. 

o maior endereco sena 7FFF 

32767 em decimal). Dessa forma, se 
conectada ao equipamento uma 

mdade maior de memona, o Siste- 

OperacionaJ simplesmente ignorara o 

rdente e o equipamento operara 

se tivesse apenas 16K. £ preciso 

ltar tambe'm que a capacidade total 
enderecamento da Z80 e de 64 K e 

desse total devem ser descontados 
8 K do Sistema Operacional e mais 8 
reservados para implementacoes. Na 
idade, o usuano tera acesso a, no 

imo, 48 K bytes de mem6ria RAM. 
Para se certificar sobre como esta 
:rando o seu equipamento, digite 

JT PEEK 3+256*PEEK 4 e compa- 
o resultado com 65535. Isso mostrara 
aonde seu equipamento podera ope- 
normalmente a memona RAM. 
A terceira instrucao e um JUMP que 
ivale ao GOTO do BASIC. Assim, a 
:ucao e desviada para o endereco 
:B (971 em decimal). 

INICIALIZANDO 

Uma analise atenta da rotina de ini- 
c5o (veja a figura 1) vai nos mos- 
que o sistema usa uma 16gica bas- 
te simples para determinar os seus 
tes. Na realidade, o que acontece 
passa de uma contagem, onde o sis- 
a parte de um determinado endereco 
AM (32767) e, gravando em cada byte 
o valor 2, vai decrementando os endere- 
eos ate" 16383, que i o ultimo byte antes 
de comecar a RAM. A partir dai o siste- 
ma volta hmpando os bytes (gravando 
lero) e contando quantos deles pos- 
|niiam o valor 2. E quando encontra o 
^nmeiro byte que nao tern valor 2, en- 
contra o final da RAM e, portanto, a 
|quantidade de bytes disponiveis ao 
usuano. 

Simples e infantil. Mas nao devemos 
squecer que a "cnanca" ainda esta nas- 
Dendo, e essa foi a sua primeira acao: 
tonhecer os hmites da RAM para que 
odo o sistema seja organizado em fun- 
fo disso. A partir desse ponto a rotina 
Dontmua operando e ira determinar as 
outras vanaveis do sistema. 

Aqui e importante uma pausa: para 
facilitar a compreensao deste assunto 
t necessdno recorrermos ao manual do 

Euipamento, em especial aos capitulos 
, 26. 27, 28 e o apendice A do TK 
no CP-200 e" o capi'tulo "Como funcio- 
na o CP-200 por dentro" e o apendice 
C). Se houver alguma dificuldade comos 
liimeros hexadecimais, basta transfor- 
na-los em decimals que o resultado sera* 
d mesmo. 
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03C3 


CD 


E7 02 


CALL 02E7 > GOSUB 7 43 


03C6 


ED 


4B 04 40 


LD BC, (4004) "1 BC=variavel RAMTOP-1 


03CA 


OB 




DEC BC J 




03CB 


60 




LD H,B 


1 HL-BC 


03CC 


69 




LD L,C J 


03CD 


3E 


3F 


LD A,3F 


tenta gravar o valor 2 


03CF 


36 


02 


LD (HL),A 


em todos os endereijos de HL, 


03D1 


2B 




DEC HL 


\ decrementando ate HL conter 


03D2 


BC 




CP H 


o endereco 16383 


03D3 


20 


FA 


JR NZ,03CF J 




03D5 


A7 




AND A 


zera todos os bytes do 


03D6 


ED 


42 


SBC HL.BC 


endereco 16 383 ate o endere- 


03D8 


09 




ADD HL.BC 


co que nao tiver o valor 2 


03D9 


23 




INC HL 




03DA 


30 


06 


JR C,03E2 




03DC 


35 




DEC (HL) 




03DD 


28 


03 


JR Z.03E2 




03DF 


35 




DEC (HL) 




03E0 


28 


F3 


JR Z,03D5 J 




03E2 


22 


04 40 


LD (4004), HL 


Estabelece a variavel RAMTOP 


03E5 


: 




: 



Figura 2 

Prosseguindo, ha vanos modos de se 
executar a micializacao do sistema. O 
primeiro e mais obvio e deshgando e re- 
ligando o equipamento, se bem que essa 
nao 6 uma boa politica porque implica 
num corte brusco da corrente eletnca, 
prejudicando, a longo prazo. o funciona- 
mento de certos componentes eletroni- 
cos. 

Atrave"s do BASIC do micro e possi- 
vel micializar o Sistema Operacional 
procedendo a uma chamada, em lingua- 
gem de maquina, para o endereco 0. 
Assim, RAND USR equivale a colocar 
o micro no estado lnicial de operacao. 
Em linguagem de maquina, qualquer 
desvio, relativo ou nao, ou chamada de 
sub-rotina, ou ainda a instrucao RST 0, 
podem ser utilizados. 

Existe tambem no BASIC o comando 
NEW que hmpa toda a memona do mi- 
cro. Quando o Sistema Operacional exe- 
cuta esse comando (ou como instrucao 
numa linha de programa em BASIC) ele 
faz um desvic para o endereco 03C3 
(963 em decimal). Nesse ponto o siste- 
ma grava no registrador BC a vandvel 
RAMTOP, ou seja, o ultimo byte da 
RAM e procede como se fosse a miciali- 
zacao. 

A diferenca 6 que se alterarmos o va- 
lor de RAMTOP (1 6388 e 1 6389) todos 
os bytes que estiverem apos o endereco 
de RAMTOP nao serao zerados pelo 
NEW, dai a afirmacao de que eles estao 
protegidos no topo da mem6ria. O co- 
mando NEW tambem pode ser chamado 
como rotina em Assembler por RAND 
USR 963 ou em linguagem de maquina 
por qualquer chamada ou desvio. 

A parte de micializacao do sistema 
nao compreende apenas a contagem dos 
bytes e a determmacao do hmite da 
memona. Todas as outras vandveis do 
sistema terao seus parametros estabeleci- 
dos pela rotina de micializacao. Apos o 
sistema definir todas as vanaveis, ele 



passa a executar a rotina principal do 
display em modo de edicao. E e exata- 
mente sobre isto que iremos tratar no 
proximo numero. ■ 

a 

Renato Degiovani 6 formado em Comunica- 
cao Visual e Desenho Industrial pela Pontifi- 
cia Universidade Catdlica do Rio de Janeiro. 
Ha" mais de um ano utiliza microcomputado- 
res para cilculos na Area em que atua. 



SUPPLY 



EM PD, TUDO 

O QUE VOCE 

NECESSITA NUM 

S6 FORNECEDOR! 

Y a Sapply nio tern apenas lodo e qualquer ti- 
po de material para CPD's. Tem tambem os 
melhores pre^os e a mais rapida entrega. Isso 
porque a Sapply tem um estoque completo das 
melhores marcas existentes no mercado. po- 
dendo assim atender — com a mesma efkien- 
cia — desde empresas de grande porte ate pe- 
quenos consumidores. 

Se o seu problema for suprimentos para Proces- 
samento de Dados, precp ou prazo de entrega. 
consulte antes a Svpply . 

Voc# fara boa* negocioa « boas aaiiaos. 




yppL¥ 



Suprimentos e Equipamentos para Proces- 

samento de Dados Ltda. 

Rua Padre Leandro. 70 — Fonseca 

CEP 24120 - Tel.: 722-7937 Niterdi — RJ. 



OUTROS ESTADOS: 

Pernambuco. Rio Grande do Norte • Parai- 
ba: Filial Recile: (081) 431-0569 — Alagoat: 
CORTEC: (082) 221-5421 — Ceara: DATA- 
PRINT: (085) 226-9328 — Malo Groaso: FOR- 
TALEZA: (067) 382-0173 






Acompanhe a evolucao de qualquer evento at raves de grdficos em seu micro 
da /in ha TRS-80 Modelos I ou III e dec id a com ma is seguranca 



Graf icos em barras e linhas 



Luiz Gonzaga de Alvarenga 



Os grdficos s3o de grande utik- 
dade quando se trata de acom- 
panhar a evoluca"o ao longo do 

tempo de uma atividade qualquer. Gitf- 
ficos em barras ou em linhas permitem 
a visualizacao rapida do desenvolvimen- 
to da atividade que se quer controlar, 
seja ela de vendas de produtos, evolucao 
de lucros, custos ou despesas etc. E com 
isto. podem ser introduzidas mudancas 
na estrate"gia envolvida para manter ou 
reverter as situacQes mostradas nos gra- 
ficos. 

Em geral os grdficos acompanham 
eventos segundo pen'odos de tempo tais 
como semanas, meses e anos. Quaisquer 
pen'odos intermediaries de tempo tam- 
be'm podem ser usados, pordm os mais 
usados sio os citados. Estes intervalos 
sao normalmente colocados segundo a 
coordenada do eixo X; no eixo Y sa"o 
colocados valores que expressam quan- 
tias em dinheiro, niimeros percentuais 
etc. 

Este programa foi desenvolvido no 
CP-500 e, consequentemente, roda em 
equipamentos da familia TRS-80 Mode- 
los I e ni: D-8000/1/2, DGT-100, CP- 
300, Naja, JR Sysdata e JP-01. Ele foi 
criado com o objetivo de permitir uma 
grande flexibilidade , tanto no sentido de 
plotar valores em barras, curvas (ou am- 
bos), bem como quanto is variacOes nos 
dois eixos. No eixo X podem ser coloca- 
dos pen'odos de tempo como meses, 



semanas ou dias, os quais s3o oferecidos 
em menu, ou entao o pr6prio usuano 
podera' teclar o in dice que desejar para 
ser colocado neste eixo. No eixo Y, va- 
lores de a 10 ate a 100.000 podem 
ser colocados diretamente; valores maio- 
res tambe'm podem ser usados, bastando 
para isso colocar um multiplicador no 
eixo. X10, XI 00 etc. 

A ESTRUTURA DO PROGRAMA 

programa se divide em quatro par- 
tes: abertura, entrada de dados, proces- 
samento e sai'da de dados (no video, em 
forma de graTico). As instrucSes, cons- 
tantes no pr6prio programa, ajudam o 
usuirio a se farruliarizar com o mesmo. 
Elas podem ser saltadas.se ji tiverem si- 
do memorizadas. 

As entradas de dados pelo teclado 
sa"o usuais. O menu do programa oferece 
indices padronizados. os quais podem 
ser escolhidos para serem colocados sob 
o eixo X; neste caso, o tftulo do graTico 
6 colocado automaticamente. Quando 
for preciso entrar com indices proprios 
de X (ao surgir na tela TECLE OS INDI- 
CES DESEJADOS), torna-se necessano 
contar cuidadosamente os espaijos para 
que a formatacSo das barras caia exata- 
mente sob os indices. 

Quando o programa pedir ENTRE 
COM O INDICE DE Y, pode-se entrar 
com valores multiplicadores de escala, 



tais como X10, X100 etc, como jd foi 
dito. A unidade em Y e" o valor maximo 
da escala: 10 (de a 10), 100 (de a 
100) etc. Este eixo 6 variavel, isto 6, 6 
colocado em margem variavel que acom- 
panha os niimeros colocados a esquerda 
do eixo. 

£ importante fazer com que o mi- 
mero de valores introduzidos coincida 
com o mimero de barras ou pontos de 
inflexfo da curva (em grdfico de linha). 

As distancias entre as barras tambe'm 
sao variiveis em funcao do mimero de 
valores introduzidos, ou seja, quanto 
maior o mimero de barras (o limite 6 
1 2), menor o espaco entre elas. Isto per- 
mite um melhor aproveitamento visual 
do graTico, evitando dispersao ou 
acumulos. 

O programa foi estruturado de modo 
a onentar todos os passos necessdrios. 
Algumas corre^Oes sSo feitas pelo pr6- 
prio programa, automaticamente, como 
quando se introduz, por erro, valores 
superiores ao da escala maxima. Neste 
caso, o mimero 6 dividido por dez, o 
que, se em alguns casos nao provoca 
diferenca significativa, em outros podera" 
acarretar o reinicio do programa. 



Luiz Gonzaga de Alvarenga 4 T4cnico de Tele- 
comunicagoes e trabalha na Embratel, em 
GoiSnia, onde reside. 
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GrAficos em Barras e Linhas 



LGIZ GONZAGA DE ALOARENGA 



MAIO DE 1983. 



'< ENTER >" ; :F0KT=iT090: NEXT: PR INiaiOOi, 



:F 



70 
80 
90 

100 
110 

lc*U 

130 

140 



100 
190 

200 

250 
260 

J/0 



10 'AUTOR: 

20 G0T050 

30 F'RINTaiGOO, 

ORR=ir030:NEXT 

40 A*= iNKEYS:lFA*=""THEN30ELSECLS:RETURN 

50 CLS:CLEAR100:DIML<13),EE(i3) F Z(13),ZA(13) , Y( 13) : AA=10:BB=8: 

6:DD=33 
60 UL3 

AS="BARGRAPH" 

B%="L1NEURAPH" 

A=LEN(AS) 

B=LEN(B4> 

FORN^ 1T0A 

PRINTCHRS(23) 

lFP=0THEN140ELSLi; J U 

P=i:PRINr3470,SrRINGS<A+2,42> 

iRINTa470,"*"LErTl(A4,N)"*":F0RI=lT030:NEXTI:NEXTN 
160 I 0RI-1T0300:NEXT:0LS 

i oi-m- ITOB 

PRINTCHR%(23> 

HHEN200ELSE210 

0-=i:PRINT346B r STRING4$B+2,42) 

PRINT3468,"*"LEFT%(Bi,M)"*":F0Rl=lT030:NEXT:NEXTM 

F0RI»1T0300*NEX1 

PRINI3668,"P0R" 

PkINT3840,"LUIZ GONZAGA DE ALOARENGA" 

FORI»iTOi500iNEXT 

CLG:JNP01"GUER INSTRUCOES (S/N )"; QS: IF Q4= "S"7HENG0SUB720 

CLL.:PRIN1"0UEK GRAFICO DE BARRAS <i> DE LINHAS <2> OU AMBO 
S <3> ?"8INPUTPK 
280 IKPK(10RPK>3THEN270 

[NT"SE OUISER USAR INDICES PADROES, TECLE <8>, SE NA 

0, (ENTER)" 

YU4 iNKLYi:ilYUi^""1HEN300ELSElFYUl=CHRi(64)THENG0T01140 

310 lls:prini"ieole os indices' desejados <50 caracteres no max 
Eho) 

i 1NEINPUTY4 
33U CLSSPRINT"ENTRE 
340 CLSHNPOT"ENTRE 
LSiPRXNT'ENTRE 

I INPUT! 
J60 II I >100000THEN3b0 
370 CLS 
380 1NPUI"QUANT0S NUMEROS ENTRARAO PARA AS BARRAS (MAXIMO DE 1 

2 ) " ; L 

390 IFL>12TFIENCLS:G0T0300 

FORJJ-iTOL 

INPUTZ(JJ) 

1FZ(JJ))1THENZ(JJ)=Z(JJ)/10 

ZA<JJ)=INI'<Z( JJ)*31/r> 

IFT-1000UOTF1ENML=1:G010520 

IFr<=100THENPP=l 

CLS:F 0RX=0T0120:SET(X,43) :NEXT : IFPP O1THEN500 

F0RY=0T046:SLI (10,Y):NEX1 

F0RY-lT043STEP3:SET(9 r Y):NEXT:lFPP=lTHEN540 

F 0RY=0T046:SEr(14,Y> :NEXT 
510 F0RY=1T043STEP3:SET(13,Y):NEX7:IFT=10000RT-10000THEN540 
520 CLS:F0RX=0T0120:SET(X,43):NEXT:F0RY-0r046:SEr(16,Y):NEXT 
530 F0RY = 1T043STEP3."SET(15,Y):NEXT 
540 PRINT325,I4; 
550 PRINT364,TS; 
560 PRINT3969,Y%; 

570 P=T/10 

580 F0RU=256T0896STEP64:PRINT3U, INT(T) ; :T=T-P:NEXT 

590 X=2i 

IFPK=2THENG0T0970 

F0RJJ=1T0L 

EE(JJ)=(43-ZA( JJ) ) 

Y(JJ)=EE(JJ) 

Y(JJ+l)=EE(JJ«i) 

F0RY=43T0EE(JJ)STEP-i 

SET(X,Y) 

NEXTY 

IFL>7ANDL(^101HENX-X+AAELSEIFL>7ANDL< = i2THENX=X-fBBELSEIFL( 
=7ANDL>4THENX=X+CCELSEIFL(-4THENX=X+DD 
690 NEXTJJ 



COM 
COM 
COM 



1ITUL0 DO 
INDICE DE 
A UN1DADE 



GRAFICO" 

Y";T4 

DESEJADA 



INPUTli 



EM Y (MAXIMO DE 100 



400 
410 
420 
430 
440 
450 
460 
470 
4U0 
490 
jOO 



600 
610 
620 
630 
640 
650 
660 
670 
680 
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CompBel 



ASSESSORIA E TREINAMENTO EM 

MICRO COMPUTADORESSC LTDA 



Introduc&o a Mlcrocomputadores 
e Basic - Dlrlgldo a Estudantes 



Basic I e Basic II 



Vlslcalc - Apllcacoes Especiflcas 
Utlllzacao de Oraflcos 



Trabalhos em Oraflcos para 
Apresentacftes - Transparenclas 



Hewlett - Packard 85-A 

Apple II 

Mlcrodlgltal TK-85 



2 a 3 Alunos por Equlpamento 
Cursos Fechadoe para 
Coleglos e Empresas 



Rua Gregorio Paes de Almeida. 62 

Vila Ida - Plnhelros - Slo Paulo 

Telefone: 65-9857 



Lo|a de sua 

preference nossos novos 
lancamentos para Unltron, 
Maxxl, Microengenho e 
Slmilares. 






DO M u ■ 

Programas de uso domestlco contendo i 
Agenda; Orcamento: Conta Corrente e 
Llsta de Compras para Supermercado 

CONTROLLER 

Programas de uso Administrative- contendo: 
Cadastre de Ciientes: Cadastro de 
Fornecedores; Movlmento de Titulos; 
Contas a Pagar e Contas a Receber 

PROGRAMMER 

Programas de uso Proflsslonals contendo: 

SDUMP - Editor de Arqulvos, Llsta seu 
• Arqulvo texto na Impressora ou 
monitor 

SLIST - Documenta e Organlza seus 
Programas 

SCROSS - Pesqulsa e Relaclona Varlavels 
com Llnha de Program* e exlbe 
no Monitor ou Impressora 

SOFTWARE SDI 

Sempre um bom Programa 

SOI • informAtica ltoa. 

Av. Brig. Farla Lima, 1853 • 5 o Andar 

Telefone: 813-4031 - Sao Paulo 



UMHkt 



Mi» 



1001 HORAS DE 
CURSOS PROGRAMADOS... 



RESPONSABMJDADE CONCfiETlZADA 

HA AREA DC EKStNO DC OENOA C 

TECMOLOGIA DA INFOKMATICA. 



CwmOtHMldM 

• Instrumental*) • Control* I • II 60 00 

• Converaa© A/0 • A na Inetrum Eletromca 

• Sistemas oe Comumcaceo por Fibres Opticas 

• Ampliticadores Oparacionais I • II 50 00 

• Eletr6nica Digital I — Combmacionai 

• Eletromca Digital II — Sequencial 

• Hardwara da Talaprocassamento 

• Software da Teleprocessamento 

• Computadoras a Microcomp. Digitus Hardwara 

• Memonas I — Monoliticas 

• Hardware do Microprocessador 8080 85 

• Hardware do Microprocessador Z-80 

• mterfaceamento e penlericos do MP 8080 85 

• Interlaceamento e penlericos do MP Z-80 . . . 



(Horae) 

a 72:00 
35:00 
. 40:00 
e 40:00 
6000 
■60 00 
45:00 
60 00 
45:00 
3500 
35 00 
35 00 
40.00 
4000 




Tambem planeiamos a 
executamos programas 
de lormacao protissional 



u- q£ u«'- -at oe rormacao protiss 
0<5 ' rt fiRA*"'ir \ P» r « E m P"»*«» que 

. PRO** . fA lx\ oermitem henefinns 



permitem bene'icios 
tiscais do CFMO 
(Lei n° 6297 75) 



inlormacoes e inserted** no 

NUCLEO OE ENSINO OE TECMOLOGIA E CtCNCIA 

| Sartadade. Tratttcao Enclenct*. | 

A Rua Alvaro Aivim 37 2- anoar ■ for* 22S-60 
(Cantroi Rio da Janeiro <am liani* a attacao 
Metro Cn«l»na.» 2 • a 6 • an 16 00 
as 22 00 ns Saoado aas 8 00 as 1 7 00 








— Cursos de programacao com 
APOSTILA PROPRIA e AU- 
LAS PRATICAS em diversos 
MICROCOMPUTADORES 

— Todas as principals marcas 
de MICROCOMPUTADORES 
pelo menor preco com credi- 
to direto em ate 24 MESES 

— Programas prontos ou por 
encomendas tanto de jogos 
quanto comerciais 

MICROCENTER INFORMATICA LTDA. 

Rm CBnda de Bonfim. 229 - Lojaa 320 e 

312 - Galena Cinema III Tel 228-0593 

Cep 20520 Tijuca Rio de Janeiro - RJ 



grAficos em barras e LINHAS 



700 IFPK=-3THENG0T0iG20 

710 G0T0710 

720 CLS:PRINT325,"INS1RUC0ES"; 

730 PRINTrPRINT 

740 PRINT"0 grafico em barras pode ser usado com var i os tipos 

de un i dades" 

750 PRINT"ou indices nas cordenadas X/Y, tais como:" 

760 PRINT 

770 PRINT" Anos: 1980 1981 1982 etc;" 

780 PRINT" Meses: JAN FEW MAR etc;" 

790 PRINT" Dias: DOMINGO SEGUNDA IERCA etc- 

800 PRINT 

810 PRlNT"num total de 50 caracteres para os indices, ou podem 

ser usados" 
820 PRlNT"os indices padroes oferecidos no menu." 
830 PRINP'Estes indices ficarao sob a coordenada X do grafiLo. 

Na coorde " 
840 PRINT"nada Y poderao estar unidades no valor max i mo bus se 

escolher. " 

850 PR INI "0 increment o pode ser f e i t o por urn, por dez por cem 
, por mil, " 
860 G0S0B30 

870 PRINT'ou por dez mil diretamente, e ind iretamente, pelo mu 
1 1 i pi i cador" 

880 PRINT"que se colocar no indice da coordenada Y: XI X10 X 
100, etc." 
890 PRINT 

900 PRINT"0 grafico de linhas e' identico quanto 'as entradas 

de unidades" 

910 PRINT"e indices. Pode-se escolher o grafico de barras de ' 

1 i nhas, ou " 

920 PRlNT" P odem ser plotados ambos, barras e linhas, se assim 

se desejar." 

930 PRINT 

940 PRINT-Qualquer erro de digitacao pode ser corrigido sem gu 

alquer" 

950 PRINT"prejuizo, durante a propr j-a teclagem." 

960 G0S0B30:RLTURN 

970 F0RPO=lTOL 

980 EE<P0)=(43-ZA(P0)) 

990 Y(P0)=EE(P0) 

1000 Y(P0+i)=EE<P0+i> 

1010 NEXT 

1020 X=2i:F0RRT=iT0L-i 

1030 IFL>7ANDL< = 10THENP=AA: GO 101070 

1040 IFL>7ANDL<=12THENP=BB 

1050 IFL<=7ANDL>4THENP=CC 

1060 IFL<=4THENP=DD 

1070 F0RJK=0T0P 

1080 SET(X+(JK-i),Y(RT)+(JK-l)*(Y(RT+l)-Y(RT))/P) 

1090 NEXTJK 

1100 X=X+P 

1110 F=F+i:lFF=LTHEN1130 

1120 NEXTRT 

1130 G0T01130 

1140 CLS:PRINT"ESC0LHA INDICE DESEJAD0:" 

1150 PRINT 

1160 PRINT"1> "-:GHt="JAN FEV MAR ABR MAI JON J0L AGO SET 0OT 

NOV DEZ":PRINTGH! ; :PRINT" (ANOAL)" 

1170 PRINT 

1180 PRINT"2) " ; :FH%=" D S T Q Q 

S S":PRINTFHi ; :PRINT" (SEMANAL)" 

1190 PRINT 

1200 PRINT"3) " ; :JHS=" 1 5 10 15 20 

25 30":PRINTJH4 ; :PRINT" (MENSAL)" 

1210 PRINT 

1220 PRINT"ESC0LHA <i>, <2> 0U <3>":INPUTTT 
1230 IFTT<10RTT>3THENG0T0ii40 

1240 1FTT=1THENY1=GH*ELSEIFTT=2THENY*=FH4ELSEIFTT=3THENY4=JH1 
1250 HY%="GRAFIC0 ANUAL" 
1260 UYS=-"GRAFIC0 SEMANAL" 
1270 IY*="GRAFIC0 MENSAL" 

1280 IFTT=lTHENI5=HYlELSEIFTT=2THENI5=UYlELSLlFlT-3THLNIi=lY4 
1290 CLS:G0T0340 
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i • MESAS •ARQUIVOS • FORMULARIOS • MICROS • IMPRESSORAS • DISQUETE • MESAS • ACESSOR IPS* > 

— 3D 

O 



filcres 



CORRIDA C/OBS- 

TACULOS 4.000 

AMBASSADOR . . . .4.500 
BATALHA NAVAL . 

II 6.000 

COLECIONADOR 
DECRISTAIS .... 6.500 
PERIGO, SERPEN- 



NOVIDADES 

CP-3O0/CP-500 
JOGOS 

BATALHA 

REA(F) 

FORCA(F) 

TIRO AO ALVO 
(F) 



SOFTWARE 



TE!!! 

PREqO ESPECIAL. S ELVA 
POR ATACADO , ad .o,m T o ' 



TABUADA (F) . . 4.000* - CONVERT (F) . . 6.400 COMANDO UFO . . 4.000 K)NG K0 NG 



COMANDO UFO 

(F) 

PATRULHA(F) . . 



PADDLE PINBALL 

(F) 

DISCOS VOADO- 

RES(F) 

DANCING DE- 
MON (F) . 

XADREZ(F) 

CUBO (F) 

JORNADA NAS 
ESTRELAS(F) . . 

ELIZA (F) 

COSMIC (F) 
SCARFMAN (F) . 
LUNAR (F) 



5.000* -SUPERTECLA 
6.000* (F) 



- SOUND (F) 6.400* SENHA 

9.600* LEGENDA S.MULADC 

F - Para programa em fita vrtn 
8.000* D Para programa em disco 

* Acrescentar Cr$ 6.000,00 TABUADA 

8.000* p/versao em disco Tl RO AO / 

10.000* VIDEO TIT 

6.400* COMPLETA LINHA DE VU . CALC 

PROGRAMAS PARA 

_„* ENGENHARIA. PACOTE 



? R°n* V,GAS CONTI- METEOR 5.200 COMPILAI 

?™ NUAS 14.000 INVASION FORCE 9.600 SEMBLER 



9.600* 
9.600 :: 



- CADASTRO DE w,,vcnjM 

CLIENTES(F) 15 0RTN UNIDADES 

(D) 20ORTN DIMENS. 

■ MALA DIRETA CONCR. Af 



FINANCAS(D) . 


30.000 


PROCALC (D) . . 


40.000 


• VIDEO (F) 


10.000* 


BANNER (F) . . . 


6.400* 


SCRIP (D) 


40.000 


(F) 


32.000 


- CONTROLE DE 




ACOES(F) 


6.400* 



DIRETORIO(D) 16.000 CP-200 
BANCO DE DA- 

DOS (D) 40.000 J~™ 

CARTA ASTRAL BATAL 



P^r|^ rv^n^.^^L^ LABIRINTO 

16.000 CP-200 ROLETA 

BRANCO NO PRE- 

40.000 AGENDA. 9.500 T0 . . . 

BATALHA AEREA. 4.000 ARTILHARIA . . . . 



(F) 15.000 BATALHA NAVAL . 5.500 S | MULAD0 R DE 

•ODONTO(F) .30ORTN BIORRITMO 4.000 v0Q ,, 

(D) 50ORTN CAD. DE CLIENTES1 3.500 MET EORO 



LISTA (D) .... 16.000 CONTAS A PAGAR 13.000 FUNGALOIDES 



FORCA . . . 
8.000 LO TO ... . 



FORCA 4.000 siMULADOR DE 

•• 4.000 v00 ,„ 9 500 

M 4.500 BLOQUEIO 5.000 

SENHA 4.500 SUPER STANDART 6.500 

SIMULADOR DE DERBY 4.000 

v0 ° 6 - 500 GUERRA DOS MIS- 

TABUADA 4.000 SE)S 4 500 

TIRO AO ALVO . . 4.000 JORNADA NAS ES- 

VIDEO TlTULO. . .15.000 TRELAS 8.500 

VU-CALC 10.000 COME A COBRA . . 5.500 

PACOTE ECON0- EDITOR DE TEXTO12.000 

MICO 4.000 ELIZA 7.500 

METEOR 5.200 COMPILADOR AS- 

INVASION FORCE 9.600 SEMBLER 8.500 



TIRO AO ALVO 



7.200 DESASSEMBLA- 

9.600 DOR 8.500 

7.200 DESCHAVEADOR .10.000 

9.600 CONTROLE BAN- 

7.200 CARIO 13.800 

5.000 ESTOQUE 13.800 



LUNAR F) ' 9600* LAGES 14000 3D DEFENDER .. . 7.200 DESASSEMBL> 

BARRICADA (F) 9 600 : PORTICOS ..... .16.000 KRAZY KONG . . . 9.600 DOR 

GALAXI (F) . ! 9^600* TRELICA 16.000 RED ALERT 7.200 DESCHAVEADOR 

METEOR (F) .... 9.600* VIGA SOBRE BASE PUC MAN ... 9.600 CONTROLE BAN 

PENETRAITOR(F) 9.600* ELASTICA 14.000 INTELECTO I . . . . 7.200 CARIO 

10 JOGOS EM BA- OPERACOES COM DODGEM 5.000 ESTOQUE 

SIC (em disco, boa, MATRIZES 14.000 POUSO EM MARTE 5.000 MOTOR A EXPLO 

sky, pouso lunar, RESOLUC. EQUA- ALBATROZ 5.500 SAO 

Jornada, teaser, cu- gAO DE GRAU 0. . 14.000 ALERTA VERME- SOUNDMAKER I . 

pirn, hopper, cram, CALC. ELEMENT. LHO 5.500 GRAPHMAKER I . 

APLICATIVO fre DO TRlANGULO. .14.000 MAZOGS 9.000 FROGGER 

-CADASTRO DE CONVERSAO DE DUELO 500 ° d.STR.BU.DOR EXC 

CLIENTES(F) 15 0RTN UNIDADES 14.000 O. V. N. 1 4.500 

(D) 20ORTN DIMENS. PCS. COMANDO SUB- pApUBlpq@ffilJ?1P 

-MALA DIRETA CONCR. ARMAD0 14.000 MARINO 5.500 ls^bmJSimi? U 



5.500 GRAPHMAKER I 

9.000 FROGGER .... 

5.000 

DISTRIBUTOR EX 
4.500 



DISTRIBUTOR EXCLUSIVO 



EAEtaTO©^ 



30.000 VIGASCURVAS . .14.000 BASE ALPHA 



A FILCRES PERMANECE ABERTA DIARIAMENTE ATE AS 18 HORAS, INCLU- 
SIVE AOS SABADOS ATE AS 13 HORAS PARA MELHOR ATENDG-LO. 
(ACEITAMOS REPRESENTANTES) 



filcres 



Filcres Importacao e Representacoes Ltda 

Rua Aurora, 165 - CEP 01209 - SSo Paulo - SP 

Telex 1 1 31 298 F I LG BR - PBX 223-7388 - Ramais 2, 4, 

12, 18, 19 - Diretos: 223-1446, 222 3458, 220-5794 e 

220-9113 - Reembolso - Ramal 17 Direto: 222^016 -220-7718 
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Nesses tempos difi'ceis, economize memoria em certas operacdes 
com este Monitor BASIC para os compati'veis com o ZX81. 



Monitor BASIC 



Renato Degiovani 



Programar um microcomputador 
da classe dos CPs, NEs. ZXs e 
TKs e\ sem duvida nenhuma. 

um exercicio de paciencia e perseveran- 
9a, pnncipalmente na fase de depuracao 
dos programas. Certas operates, como 
edicSo, gravacSo e eliminacSo de lmhas. 
podem, as vezes, exigir bastante tempo e 
calma, devido as caracteristicas do siste- 
ma operacional desses micros. 

Na realidade, todo usudno que dedi- 
ca um tempo maior a esses equipamen- 
tos, alem do gasto com jogos e passa- 
tempos, acaba sentmdo a falta de uma 
ferramenta que o auxihe na elaboracao 
e estruturacao dos seus programas. 

Monitor BASIC e um programa 
que pretende facilitar algumas tarefas do 
programador, sem que isso signifique 
um grande gasto de memoria. Na verda- 
de, foram gastos apenas 2K bytes de me- 
m6na para o programa e. desses bytes, 
apenas 1 ,3K foram realmente ocupados, 
restando ainda espaco para futuras mi- 
plementacoes. 

Algumas rotinas que compoem o 
Monitor sao rotinas ja conhecidas, da h- 
teratura estrangeira, outras foram escri- 
tas especialmente para o Monitor, po- 
re"m, todas elas foram adaptadas para 
operarem sob a maxima seguranca.alem 
de funcionarem como comandos lmedia- 
tos. 

DIGITACAO 

Monitor BASIC sera posicionado 
no topo da memoria. Antes que isso seja 



feito, no entanto, e necessano reservar- 
Ihe espa90 digitando: POKE 16389.120 
e NEW LINE. Isso fara com que 2048 
bytes fiquem fora do sistema BASIC 
normal e, desse modo. protegidos contra 
apagamento. A seguir, coloque no micro 
o Editor Assembler, publicado em 
MICRO SISTEMAS n9 23. e. logo apos. 
digite a Listagem 1 . Essa Listagem com- 
poe mais um modo de operacao para o 
Editor Assembler (modo F) e admite a 
entrada de dados em linhas, apresentan- 
do. apos cada hnha, a soma dos valores 
dos codigos de maquina de cada uma. 

Agora, digite RUN e opere o modo F 
(basta pressionar a tecla F). Quando o 
sistema pedir o endereco, tecle 30720 e 
comece a digitar as linhas do bloco 
Assembler (nao digite os espacos entre 
os dados, eles sao apenas para facilitar a 
leitura). Apos cada hnha, pressione 
ENTER e confira a soma apresentada no 
video com a soma de cada hnha do blo- 
co. Se houver algum erro, digite "— " pa- 
ra voltar a hnha anterior (M provoca o 
retorno ao inicio do sistema). 

Quando terminar a digitacao do blo- 
co Assembler, digite M e introduza os 
valores a seguir. usando o modo A: 

32760 80 

32761 78 

32762 80 

32763 78 

32764 80 

32765 78 

32766 80 

32767 78 



O trabalho esta terminado. Agora e 
testar o Monitor e depois arquiva-lo em 
fita cassete. Para isso. digite a hnha: 1 
PRINT USR 30741. Essa e a hnha que 
opera o Monitor. Ela deve ser sem pre 
escnta dessa forma e ser sempre a pri- 
meira hnha do programa, caso contrano. 
o Monitor BASIC nao funcionara. 

Digite RUN e... agora voce tern uma 
sene de comandos a sua disposicao. A 
exphcacao e modo de operacao de cada 
um deles esta logo a seguir. Quando vo- 
ce estiver famihanzado com os coman- 
dos, sera" hora de arquiva-los em fita e, 
para isso, retorne ao BASIC do micro, 
digite NEW, seguido da Listagem 2. 
Apos alguns segundos, o programa se 
auto-preservara" (hgue o gravador e apos 
a gravacao, teste-a com o comando 
Verify N). Toda vez que voce for carre- 
gar o Monitor no micro, nao esqueca 
de antes digitar: POKE 16389, 120 e 
NEW. 

OPERACAO DO MONITOR 

Ao se entrar no Monitor, a pnmeira 
mensagem 6: 

MONITOR BASIC - 1983 

<RPD> MICRO SISTEMAS 
> 

indicando que o sistema aguarda um co- 
mando. Alguns comandos sao finahza- 
dos pela indicacao <OK, significando 
t^rmino do comando sem erro. Se hou- 
ver uma indicacao < *e porque houve 
algum erro na digitacao. A tecla BREAK 



46 
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irrompe a execucao de qualquer co- 
ldo e retorna a mensagem lnicial. 
Vejamos, entao, os comandos do 
■tor: 

RETURN 1: (tecla Y) retorna ao 
jfcSIC do micro com a mensagem de er- 
iRi. 

LIST xxxx: (tecla K) hsta o progra- 

a partir da linha xxxx (entre 1 e 

'. Se nao houver argumento a Lista- 

sera a partir da pnmeira linha do pro- 

i). A listagem 6 feita linha por linha, 

posicao AT 20,0 (ate o final do pro- 

la) e a cada tecla pressionada uma 

linha ocupa essa posicao. BREAK 

rompe o processo. 

> SAVE: (tecla S) grava na fita cassete 

[programa BASIC que esteja na memo- 

A velocidade de transference e de 

)ximadamente o dobro da velocida- 

i normal do micro. 



> LOAD: (tecla J) recupera da fita o 
programa gravado pelo comando SAVE 
do Monitor. 

> VERIFY: (tecla V) venfica se a gra- 
vacio em fita, do comando SAVE do 
Monitor, esta correta. Caso contrano, o 
Monitor informa em qual endereco hou- 
ve erro. 

> VERIFY N: (tecla V e N) venfica se 
a grava?ao em fita, feita normalmente 
pelo micro, esta correta. 

> ORG: (tecla 0) apresenta a organiza- 
cao da memona com tres mensagens: 

PRG ■ quantidade de bytes gastos 

pelo programa; 
VRS = quantidade de bytes gastos 

pelas vanaveis do programa ; 
RVA = quantidade de bytes amda 

disponi'veis. 

> DELETE xxxx/yyyy: (tecla D) apaga 
as linhas compreendidas entre o bloco 



xxxx e yyyy (a linha yyyy nao e apaga- 
da). 

> LINE xxxx: (tecla L) apresenta a es- 
trutura da linha xxxx de acordo com a 
sua gravacao na RAM, isto e, em tres 
colunas. Veja: 

carater/sigmficado 

1 

14 

PRINT 

USR 

3 


Renato Degiovani 6 formado em Comunica- 
gao Visual e Desenho Industrial pela Pontiff- 
cia Universidade Catdlica do Rio de Janeiro. 
Ha" mais de um ano utiliza microcomputadores 
para c&lculos na irea em que atua. 



endereco 


valor 


16509 





16510 


1 


16511 


14 


16512 





16513 


245 


16514 


212 


16515 


31 


16516 


28 





Listagem 1 


1810 


PRINT ,,"**** PIICR0 EDITOR 


[ASSEMBLER ••••", , tf "JOSE CARLOS 


■IZA" 


."FIICRO SISTEI"1AS/1983",,,,, 


•flODOS DE 0PERACA0:",,,"A - INSE 


RE DADOS HEXADECinAL'V'B - INSER 


E DADOS DECIPIAL'V'C - EXECUTA RO 


TINA 


ASSEMBLER", "D - RETORNA A0 


■ASIC 


",''E - ARQUIUA EH FITA","F 


- INSERE LINHA DE DADOS" 


1090 


IF U$<"A" OR Uf>"F" THEN GO 


TO 1070 


4500 


PRINT "ENDERECO?" 


4510 


INPUT E 


4520 


SCROLL 


4530 


PRINT E; " "; 


4540 


INPUT U$ 


4550 


IF U$="-" THEN LET E=E-10 


4560 


IF U$a"ri" THEN GOTO 1030 


4570 


4580 


IF LEN U$<>20 THEN GOTO 452 


PRINT U$5" "; 


4590 


LET T=0 


4600 


LET X=C0DE U$*16*C0DE U$(2) 


-476 




4610 


LET T»T*X 


4620 


POKE E,X 


4630 


LET E=E*1 


4640 


LET U$=U$(3 TO ) 


4650 


IF U$<>"" THEN GOTO 4600 


4660 


PRINT T 


4670 


GOTO 4520 




Listagem 2 


1 


PRINT USR 30741 


1000 


FAST 


1010 


CLEAR 


1020 


Did AS(2100) 


1030 


FOR A=l TO 2100 


1040 

9) 
1050 


LET A$(A)=CHR$ PEEK (A+3071 


NEXT A 


1060 


SAVE "P10NIT0R" 


1070 


FOR A=l TO 2100 


1080 


POKE A*30719,CODE AS(A) 


1090 


NEXT A 


1100 


RUN 





Bloco Assembler 












31360 


78 C3 ES 03 00 36 2A 37 2E 2B 


792 










31370 


3E 00 06 08 21 84 7A CD 12 79 


707 




30720 


FA 7F EE 77 E5 D5 ED 73 00 78 


1648 


31380 


CD 6A 76 FE 33 26 0A CD 2A OA 


1043 




30730 


ED 7B 02 78 21 7D 40 22 29 40 


843 


31390 


FO C6 09 CE C3 C2 79 CD 2A 0A 


1438 




30740 


C9 ED 73 02 78 ED 78 00 78 Dl 


1364 


31400 


37 C6 12 C6 0A CD 62 7A 18 FB 


1269 




30750 


El C9 CD OE 0C CD 0E 0C CD 0E 


1107 


31410 


0E 01 06 00 3E 7F DB FE D3 FF 


1149 




30760 


0C CD 0E 0C CD 0E 0C C9 AF 07 


1065 


31420 


IF D2 78 76 17 17 38 2E 10 TO 


866 




30770 


3E 13 D7 3E 17 D7 31 00 80 C3 


968 


31430 


Fl CO 62 7A 79 17 30 F9 21 09 


1229 




30780 


A0 78 32 34 33 2E 39 34 37 00 


643 


31440 


40 CD 62 7A 11 79 40 A7 CS ED 


1404 




30790 


27 26 38 2E 28 00 16 00 ID 25 


307 


31450 


52 El 38 05 79 8E C2 56 7A 23 


1121 




30800 


24 IF 13 37 35 29 12 00 32 2E 


349 


31460 


ED SB 14 40 A7 ES ED 52 El 20 


1384 




30810 


28 37 34 00 36 2E 38 39 2A 32 


454 


31470 


E2 C3 A9 79 D5 IE 94 06 1A ID 


1163 




30820 


26 38 00 00 00 00 01 00 BO CD 


.426 


31480 


DB FE 17 C8 76 7B 36 F5 10 F5 


1507 




30830 


36 OF ED 4B 25 40 CD BD 07 7E 


1009 


31490 


Dl 20 04 FE 56 30 AB 3F CB 11 


1087 




30840 


FE 00 CO 31 00 80 IB 06 CD 23 


893 


31500 


30 A6 C9 CO 6A 78 FE 76 C8 FE 


1672 




30850 


OF CD 2A OA CD 26 78 21 3E 78 


850 


31510 


77 20 11 2A OE 40 2B 22 0E 40 


443 




30860 


06 14 7E D7 23 10 FB CD OE OC 


900 


31520 


7E FE 00 CA 30 78 36 00 18 E5 


1057 




30870 


21 52 78 06 18 7E D7 23 10 FB 


908 


31530 


01 1C 0A B9 26 06 0C 10 FA C3 


743 




30880 


CD 23 78 3E 12 07 CD 6A 78 FE 


1340 


31540 


30 78 07 IB 06 ES 21 00 00 06 


889 




30890 


3E CA DE 78 FE 30 CA 92 7B FE 


1633 


31550 


0B 29 17 30 01 19 10 F9 E5 CI 


833 




30900 


31 CA 96 7C FE 38 CA 6E 79 FE 


1522 


31560 


El 09 C9 CD OF 76 21 00 00 ED 


1046 




30910 


2F CA 69 79 FE 3B CA BC 7A FE 


1586 


31570 


56 OE 40 IB 1A FE 00 C8 06 1C 


918 




30920 


34 CA 1A 79 00 00 00 00 00 FE 


655 


31580 


6F IB 1A FE 00 C8 06 1C 05 11 


1090 




30930 


29 CA F9 7B 00 00 00 00 00 C3 


810 


31590 


OA 00 CO 39 7B Dl 16 1A FE 00 


911 




30940 


A6 78 3E FE CD 4B 09 21 80 78 


1172 


31600 


C8 06 1C DS 11 64 00 CO 39 7B 


1157 




30950 


31 00 60 E5 E5 E5 E5 21 FA 7F 


1503 


31610 


Dl IB 1A FE 00 C8 06 1C DS 11 


1188 




30960 


22 00 76 ED 7B 02 78 3E 1A 32 


774 


31620 


E8 03 CD 39 7B Dl IB 1A FE 00 


1136 




30970 


00 40 01 01 00 C9 34 37 2C 00 


418 


31630 


CB C3 30 78 3E F0 CD 4B 09 CD 


1359 




30980 


35 37 2C 14 38 37 36 14 37 3B 


476 


31640 


46 76 CD D8 09 ES CD 26 76 01 


1221 




30990 


26 14 06 04 7E 07 23 10 FB AF 


886 


31650 


00 14 CD F5 08 El CD A5 OA 23 


1118 




31000 


D7 C9 AF D7 21 00 79 CD 10 79 


1302 


31660 


23 23 7E FE 7E 20 05 23 23 23 


718 




31010 


CD 26 7B 21 04 79 CD 10 79 2A 


905 


31670 


18 F3 FE 76 28 2A CB 77 F5 C4 


1484 




31020 


0C 40 11 7E 40 CD 58 79 21 08 


738 


31680 


48 09 Fl CC 10 00 3A 3A 40 FE 


979 




31030 


79 CD 10 79 2A 14 40 26 ED 56 


960 


31690 


03 20 EO E5 CD 6A 78 3A 39 40 


1098 




31040 


10 40 CD 58 79 21 OC 79 CD 10 


881 


31700 


4F 3E 21 91 4F 06 14 CS CO 0E 


840 




31050 


79 2A 02 78 ED 56 1C 40 CD 56 


998 


31710 


0C CI CD F5 08 El 18 C7 D7 23 


1361 




31060 


79 C3 AO 78 A7 ED 52 E5 CI CD 


1709 


31720 


7E FE 76 CA A9 79 C3 A8 76 00 


1476 




31070 


04 78 CD 29 78 C9 CD 46 09 CD 


1185 


31730 


29 2A 31 2A 39 2A 00 06 06 21 


320 




31080 


6A 76 CD 2A OA C9 3E F6 CD 64 


1299 


31740 


Fl 76 CD 12 79 CD 46 7B CD 08 


1532 




31090 


79 21 OA 40 4E 37 CB 11 28 22 


655 


31750 


09 E5 E5 AF D7 3E 18 07 AF 07 


1548 




31X00 


9F E6 03 C6 02 SF 03 FF 06 22 


1193 


31760 


CD 46 7B 00 CD D8 09 01 £5 2A 


1313 




31110 


10 FE 3E 7F DB FE IF 02 80 78 


1421 


31770 


OC 40 EB A7 ED 52 D2 30 78 El 


1400 




31120 


06 20 10 FE ID 20 E8 06 6E A7 


887 


31780 


ES A7 EO 52 02 30 78 El Dl OS 


1740 




31130 


10 FD 18 DA 23 EB 2A 14 40 37 


962 


31798 


05 E5 A7 ED 52 DA 30 78 01 2A 


1565 




31140 


ED 52 E6 30 CD CD OE OC 3E 13 


1119 


31800 


OC 40 A7 ED 52 30 04 ED S6 OC 


954 




31150 


07 00 3E 34 D7 3E 30 D7 C3 36 


1120 


31810 


40 2A 14 40 ES A7 ED 52 ES CI 


1327 




31160 


78 3E EF CD 64 79 FD C8 09 8E 


1454 


31820 


E6 Fl 01 F5 ED B0 EB Dl A7 ED 


2191 




31170 


FD CB 09 86 18 10 0E 01 06 00 


673 


318 30 


52 ES CI El CD AO 09 01 IS 15 


1159 




31180 


3E 7F DB FE D3 FF IF 30 46 17 


1300 


31840 


CD FS 08 AF D7 C3 AC 79 00 31 


1385 




31190 


17 38 66 10 Fl Fl FD C8 09 46 


1214 


31850 


2E 33 2A 00 76 E5 E5 CD OE 0C 


946 




31200 


20 46 21 0A 40 11 E6 79 D5 18 


821 


31860 


CI CD 04 76 01 06 15 CD F5 08 


1008 




31210 


DD FD C6 09 C6 FD CB 09 4E 28 


1467 


31870 


El 7E ES 21 6E 7C 77 28 CO A5 


1379 




31220 


04 79 BE 20 3A 71 23 EB 2A 14 


850 


31860 


OA AF D7 El 7E FE DE 30 03 AF 


1453 




31230 


40 37 ED 52 E8 30 CO 22 14 40 


1063 


31690 


D7 7E 23 C9 06 06 21 66 7C CD 


10SS 




31240 


36 76 23 36 7F 23 36 76 23 22 


664 


31900 


12 79 CD 46 76 CD 08 09 E5 CO 


1406 




31260 


C6 09 46 28 37 FD CB 09 4E 20 


952 


31910 


OE OC El CD 6F 7C CO 6F 7C E5 


1360 




31270 


31 C3 71 7A FD CB 09 4E CA 71 


1337 


31920 


28 4E 26 46 El CD 04 78 CO 6F 


1104 




31280 


7A 18 28 E5 11 7D 40 B7 ED 52 


1123 


31930 


7C CD 6F 7C E5 28 46 2B 4E El 


1252 




31290 


El 38 BD 16 1C IE 00 06 16 1C 


608 


31940 


CD 04 78 CD 6F 7C FE 7E 20 11 


1198 




31300 


D8 FE 17 38 FB 10 F8 7B FE 24 


1477 


31950 


3E 33 D7 3E 01 D7 06 05 CS CD 


1019 




31310 


38 C9 FE 5A 3F C8 11 30 C2 C9 


"1327 


31960 


6F 7C CI 10 F9 IB ID FE 76 20 


1150 




31320 


C3 76 78 E5 CD OE OC 3E 12 07 


1193 


31970 


OF 3E 33 07 3E 18 D7 3E 31 D7 


970 




31330 


AF 07 CI CD 04 78 01 08 15 CD 


1147 


31980 


CD 0E OC C3 A9 79 C6 77 F5 C4 


1479 




31340 


F5 08 C3 30 78 21 60 76 31 00 


946 


31990 


46 09 Fl CC 10 00 E5 CD 6A 78 


1205 




31350 


80 E5 E5 E5 E5 21 FA 7F 22 00 


I486 


32000 


El C3 C7 7C 00 00 00 00 00 00 


743 

5 
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Para o Apple e compati'veis, um estudo tedrico e pratico sobre como gerar 
figuras em alta reso/ucao utilizando tabelas de for mas. 



Alt a resolucao por 
tabela de formas 



Evandro Mascarenhas de Oliveira 



E 



ste artigo procure ampbar os conhecimentos do usua- 
no de micros compati'veis com o Apple (como o Mi- 
croengenho, Maxxi e AP II, por exemplo), a respeito 
de como utilizar os recursos de alta resolucao de seu equipa- 
mento atravds das tabelas de formas. 

As figuras cnadas a partir destas tabelas utilizam vetores 
que plotam ou nSo hnhas, formando desenhos simples ou com- 
plexos, numeros, simbolos etc., os quais podem ser reduzidos, 
amphados e ate 1 mesmo rodar em torno de um eixo (o que fa- 
cilita seu uso, pnncipalmente em jogos eletronicos). 

Estes vetores sa"o codificados em binano, de acordo com a 
figura 1 , e sSo agrupados em dois tipos: 

a) Vetores plotantes — deslocam-se tracando lmhas, cujas dire- 
coes para cima, para baixo, para a esquerda ou para a direita 
sao representadas por uma seta cheia, cuja ponta indica a dire- 
qSo( ► ). 

b) Vetores nao plotantes ou so de movimento — denominados 
ghost vectors, deslocam-se. sem tracar linhas, nas mesmas dire- 
coes que os plotantes. Sao representados por uma seta traceja- 
da, cuja ponta indica a direcao do movimento ( ►•). 

As figuras a serem tracadas em alta resolucao grafica devem 
ser planejadas cuidadosamente , com sua configuracao deter- 
minada pelo conjunto de vetores, plotantes ou na"o, partindo 
de uma ongem (que sera o centro de rotacao e posica"o na te- 
la), de acordo com as coordenadas da linha e da coluna, as 
quais serao mdicadas pelas instrucOes ROT, DRAW e XDRAW 
e cujo tamanho e" especificado pela instrucao SCALE. 

Cada grupo de dois vetores, pelos seus c6digos binanos, for- 
marSo um byte de seis bits, cujo decimal respectivo constitui- 
ra um dos elementos da tabela de formas (figura 2). 

Na figura 3 esta representada uma cruz pelos seus vetores 
plotantes, iniciando na ongem (zero), seguindo as dm^Qes 
mdicadas pelos 14 vetores e terminando no ponto de ongem 
A. A organizaca'o da tabela de formas obedecera' a seguinte 
ordenaca"o, a partir da origem 0: 



Vetores 


Binarios 


Byte 


Decimal 


- 


1 


100 


100100 


36 


1 - 


2 


100 






2 - 


3 


101 


100101 


37 


3 - 


4 


100 






4 - 


5 


111 


100111 


39 


5 - 


6 


100 






6 - 


7 


111 


110111 


55 


7 - 


8 


110 






8 - 


9 


111 


110111 


55 


9 - 


10 


110 






10 - 


11 


101 


110101 


53 


11 - 


12 


110 






12 - 


13 


110 


101110 


46 


13 - 


14 


101 







Cada vetor, dependendo da direcfo do desenho, tera o co- 
digo da figura 1, e os dois agrupados formarao o byte, sendo 
os tres bits mais significativos o segundo vetor e os tres 
menos significativos o pnmeiro vetor. O niimero decimal cor- 
respondente ao byte de seis bits sera tornado da figura 2. 

Quando o niimero de vetores for impar, o ultimo valor que 
completari o conjunto de dois vetores finais seii sempre zero 
(000) (figura 4). 

A tabela sempre termina em zero, e no caso apresentado tera 
a seguinte ordenacSo: 36, 37, 39, 55, 55, 53,46,0. 
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* 



>*° ye 



^ 
v 



&s 



/ # *• <r 



if tf 



?s 



















8 


1 
















40 
















1 


9 


1 













1 


41 













1 





10 


1 










1 





42 













1 


1 


11 


1 










1 


1 


43 










1 








12 


1 







1 








44 










1 





1 


13 


1 







1 





1 


45 










1 


1 





14 


1 







1 


1 





46 










1 


1 


1 


15 


1 







1 


1 


I 


47 



















16 


1 
















48 
















1 


17 


1 













1 


49 












1 





18 


1 










1 





.0 


o 










1 


1 


19 


1 




6 





1 


1 


51 









1 








20 


1 







1 








52 









1 





1 


21 


1 







1 





1 


53 


1 ° 







1 


1 





22 


1 







1 


1 





54 









1 


1 


1 


23 


1 







1 


1 


1 


55 

















24 


1 















56 














1 


25 


1 












1 


57 











1 





26 


1 









1 





58 











1 


1 


27 


1 









1 


1 


59 


1 ° 






1 








28 


1 






1 








60 









1 





1 


29 


1 






1 





1 


61 









1 


1 





30 


1 






1 


1 





62 









1 


1 


1 


31 


1 






1 


1 


1 


63 



Figura 2 - Conversdo dos bytes de seis bits para decimal 
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i 


2 3 

1 








■J>0 
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Figura * 





Figura 3 - Cruz formada por 14 vetores plotantes, iniciando em e ter- 
minando em 14. O centro de rotacdo e de localizacao na tela encontra- 
se em 

Figura 4 - Representacdo grdfica de um CINCO ou S, com numero 
impar de vetores 



FORMAQAO DA TABELA COMPLETA 

Para ser entendida pelo computador, a tabela de formas 
;ompleta deverri ter uma parte micial denominada diretdrio, 
>eguida dos decimals relativos aos agrupamentos dos vetores 
que acabamos de analisar, e i organizada por um conjunto de 
Dy tes com a seguinte significaca"o : 
» 19 byte: numero de formas da tabela; 
i 29 byte: sem utilizacSo. £ ignorado pelo computador. po- 
Jendo ter qualquer valor entre zero e 255; 
i bytes seguintes: inicialmente sao apontadores de cada for- 
na, denominados o/f-ser ou distancia absoluta em bytes. Esta 
distancia e" contada desde o inicio (byte 1) e 6 formada por 
dois bytes, sendo o segundo sempre zero, e o primeiro, o nu- 
mero total de bytes desde o ini'cio da tabela. 

O primeiro off-set i dado pela forma: DB = NF. 2+2, sendo 
DB a distancia em bytes e NF o numero de formas da tabela. 
No caso da figura 3 ha apenas uma forma, portanto, NF = 1; 
logo, DB = 1 x 2+2 = 4, e o diret6rio sera: 

• 19 byte: 1 (numero de formas); 

• 29 byte : (qualquer numero entre zero e 255); 

• 39 byte: 4 (valor de DB); 

• 49 byte :0 (zero); 

• 59 byte em diante : segue a tabela dos vetores; 

• ultimo byte: sempre zero (e" o indicador do final de cada 
forma). 

Portanto, os valores da tabela de formas completa da figura 
3 serao: 1 , 0, 4, 0, 36, 37, 39, 55, 55, 53,46, 0. 

Precisamos informar ao computador onde esta colocada, na 
mem6ria, a tabela de formas, e isso € feito atrave's das localiza- 
coes 232 e 233, que conterao os valores indicatives do inicio 
do endereco onde comeca a tabela. O endere?o 232 conterd o 
byte menos significative, em decimal, relativo ao endereco; 
233 conterd o byte mais significativo. 

Os enderecos mais usados sa"o: 

a) 768 ou S 0300 - area para colocacao de vetores; 

b) logo abaixo do DOS - quando o DOS e" colocado na me- 
m6ria do computador seu endereco de ini'cio pode ser determi- 
nado por PRINT PEEK(116) *256 + PEEK(115), que da o va- 
lor 38400 (sem o DOS o valor e" 49152). 

A tabela seri iniciada 256 bytes antes, ou entSo no endere- 
co 38144 (que tambe'm pode ser representado por $ 9500). 
Para o endereco 768 ($0300), os valores ficam: 

Enderego $ Decimal 
232 00 



233 



03 



* 






ALTA RESOLUQAO POR TABELA DE FORMAS 



Ji para o endere90 38144 ($ 9500), ter-se-a: 

End er ego $ Decimal 



232 
233 



00 
95 




149 



Atrav(5s de POKE 232,0 e POKE 2333, ou entao POKE 
232,0 e POKE 233,149, sera" indicado o initio da tabela de 
formas. No caso do endereco 38144, deve-se garantir sua area 
at rave's de HIMEM: 38144. 

Para carregar o computador com a tabela de formas da figu- 
ra 3 voce deve usar o seguinte programa, com initio em 768: 

10 POKE 232,0 : POKE 233,3 

20 FOR K- 768 TO 779 

30 READ A 

40 POKE K,A: NEXT 

50 DATA 1, 0, 4, 0, 36, 37, 39, 55, 55, 53, 46, 

Se for escolhida a area logo abaixo do DOS, substituir as li- 
nhas 10e20por: 

10 POKE 232,0 : POKE 233,149 
20 FOR K= 38144 TO 38155 



e adicionar 



5 HIMEM: 38144 



Na figura 4 tem-se a representacSo do numero cinco ou le- 
tra S, que possui valor impar de vetores e cuja orgaruzacao da 
tabela sera: 



Vetores 

0-1 
1-2 

2-3 
3-4 

4-5 



Binario 

101 
100 

111 
100 

101 
000 




Decimal 
37 
39 



000101 



Se reunirmos os graTicos das figures 3 e 4 numa s6 tabela te- 
remos: 

• 1 9 byte : 2 (numero de formas); 

• 29 byte : (qualquer valor entre zero e 255); 

• 39 byte: 6 (valor de DB); 

• 49 byte:0 

• 59 byte: 14 (distancia em bytes desde o primeiro: seis ate" 
a primeira forma e oito bytes ate* o initio da segunda forma), 
ou: 



la. forma 



♦-6 bytes 



h 



•■k2a. forma 



H 



2 (6)0 ft 36 37 39 55 55 53 46 37 39 5 



^ 



14 bytes 



• bytes seguintes : seguem a tabela das duas formas. 

O programa a seguir gera, automaticamente , o diret6rio e a 
tabela de vetores, calculando a distancia em bytes, desde o pri- 
meiro de cada forma (offset). Se o numero total de bytes da 
tabela exceder 255, havera erro na linha 1060, pois qualquer 
valor acima de 255 sera rejeitado pelo computador (o micro- 



processador € de 8 bits, portanto, o maior numero que pode 
ser colocado em urn endereco 6 255), que apontara QUANT 
ILEGAL - ERRO EM 1060, indicando o limite ultrapassado 
pela tabela, o que forcard sua reformulacSo. 

1000 READ NF, EI,NB,Bl,B2 

1010 DATA 4,38144,256,0,149 

1020 POKE 232, Bl: POKE 233, B2: POKE 

EI,NF 
1030 DB = 2 * NF + 2 
1040 FOR I = 1 TO NF 
1050 12 = INT (DB / NB) :I1 = DB - 

NB * 12 
1060 POKE EI + 2 * 1,11: POKE EI 

+2*1+ 1,12 
1070 READ TB: POKE EI + DB,TB 
1080 DB = DB + 1 
1090 IF TB < > THEN 1070 
1100 NEXT : RETURN 

1200 DATA 

1300 DATA 

1400 DATA 

1500 DATA 

Onde: 

NF = numero de formas 

EI = endereco initial 

NB = numero de bytes 

Bl = byte menos significativo 

B2 = byte mais significativo 

DB = distancia em bytes 

TB = dados da tabela para cada forma (linhas 1 200 a 1 500) 

Observacfo: Bl e B2 correspondem ao initio da tabela. 

Quando houver mais de 255 bytes, deve-se dividir a tabela 
em duas ou mais, colocando cada uma com initio em um ende- 
reco diferente; e antes de processar o programa, atrave's de 
DRAW e XDRAW, indicar o endereco onde est$ a forma 
desejada (os enderecos 232 e 233 sa"o referentiados pelo com- 
putador antes de DRAW e XDRAW, apontando onde esta a 
tabela de formas). 

Agora vejamos o caso dos vetores nao plotantes. Quando se 
quer desenhar uma figura dentro da outra, sem plotar nenhu- 
ma linha de comunicacao entre elas, considerando o conjunto 
como uma figura so, usam-se os vetores nao plotantes ou 
ghost vectors, conforme a figura 5. 



21 



22 



23 



24 



20 
19 

18 
17 
16 



2— ♦& 



1. 1 



25 



26 

*.I0 



13 



12 



Figura 5 - Representagao grdfica de um quadrado dentro do outro por 
seus vetores plotantes e mo plotantes 

Nesta figura hi um quadrado dentro do outro; observe que 
a ordenac5o dos vetores initia a partir do centro (zero) e 
termina em 26. Observe tambCm que o vetor 0-1 6 nSo plotan- 
te e que o quadrado interno € gerado a partir de 1 ate" 9;dai, 
pelo vetor nfo plotante 9-10, initia-se o quadrado externo, que 
termina em 26. A organizacao da tabela obedecera" a : 
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Ve tores 


Binarios 


- 


1 


001 


1 - 


2 


110 


2 - 


3 


111 


3 - 


4 


111 


4 - 


5 


100 


5 - 


6 


100 


6 - 


7 


101 


7 - 


8 


101 


8 - 


9 


110 


9 - 


10 


001 


10 - 


11 


110 


11 - 


12 


110 


12 - 


13 


111 


13 - 


14 


111 


14 - 


15 


111 


15 - 


16 


111 


16 - 


17 


100 


17 - 


18 


100 


18 - 


19 


100 


19 - 


20 


100 


20 - 


21 


101 


21 - 


22 


101 


22 - 


23 


101 


23 - 


24 


101 


24 - 


25 


rio 


25 - 


26 


110 



Byte 



110001 



111111 



100100 



101101 



001110 



110110 



linn 



mm 



100100 



100100 



101101 



101101 



110110 



Decimal 



49 



63 



>6 



45 



14 



54 



63 



63 



36 



36 



45 



45 



54 



DIRECOES 


DECIMAL 


DIRECOES 


DECIMAL 


! 


4 




63 




n 


44 


1 


6 


n 


60 


u 


46 


t 
t 


36 


. 1 


62 




45 


1 


54 





Figure 6 - Direcdes plotantes comumente usadas e seus eddigos deci- 
mals 





TABELA DE CORES 
EM ALTA RESOLUCAO 




CODI 
GO 


DRAW 


XDRAW 


COdi 

GO 


0/4 


PRETO 


BRANCO 


3/7 


3/7 


BRANCO 


PRETO 


0/4 


2 


VIOLETA 


VERDE 


1 


5 


LARANJA 


AZUL 


6 


1 


VERDE 


VIOLETA 


2 


6 


AZUL 


LARANJA 


5 



Figura 7 - Cores em aha resohicdo para DRAW e XDRAW (comple- 
mentares) 



Nota: na figura 6 esta"o as direcOes plotantes mais comuns e 
seus respectivos eddigos em decimal. 

GERACAO DE FIGURAS N A TELA 

Atrave's dos comandos DRAW, XDRAW, ROT e SCALE 

poderemos ver no video os desenhos representatives das figu- 
res codificadas pela tabela de formas. Analisemos um a um. 

a) DRAW e XDRAW: desenham a figura numa determinada 
posica"o, sendo a cor de XDRAW complementar a de DRAW 
(figura 7). A sintaxe 6: DRAW (ou XDRAW) N AT C, L, sendo 
N o numero indicativo da ordem em que foi lida a figura na 
tabela (no primeiro desenho, N= 1 ; no segundo, N= 2, e assim 
sucessivamente). C e L indicam a coluna e linha corresponden- 
tes ao ponto de ongem dos vetores da figura. 

b) SCALE: indica o tamanho relativo da figura, numa ordena- 
cao que vai de 1 a 255. O valor miximo 6 zero, corresponden- 
do a 256 unidades na escala. Sua sintaxe € SCALE = X, sen- 
do X um numero entre zero e 255. 

c) ROT: este comando faz a figura girar em tomo de um eixo 
que passa pelo ponto zero da origem dos vetores. Varia de a 
64 (0 = zero graus e 64 = 360 graus), numa rotacao de 360 
graus (figura 8), correspondendo, cada 16 unidades, a um an- 
gulo de rotacflo de 90 graus. Sua sintaxe 6 ROT = Y, sendo Y 
um valor entre e 64 (zero e 360 graus). 



ROT= 64 ou 360 
ROT= ou 9 



ROT= 56 ou 315 



ROT= 48 ou 270 V £> 



ROT= 40 ou 225 




ROT= 8 ou 4 5 



<] ROT= 16 ou 90* 



ROT= 24 ou 135 s 
A 
ROT= 32 ou 180 9 



Figura 8 - Instrucdo ROT com a correspondencia em graus, para varia- 
cdes de oito unidades ou 45 graus por deslocamento 



Vistos os comandos, podemos enta"b passar para o progra- 
ma, cujo objetivo 6 demonstrar toda esta teoria que vimos ate 
agora "e executar as quatro formas (cruz, quadrado, cinco e 
quadrado dentro do outro). ROT e SCALE sa"o demonstrados _ 
atrave's dos movimentos da figura "quadrado dentro do outro". ^ 
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Figura 9 - Tabela de formas completa do programa demonstrative) 

A sub-rotina em 1000 gera a tabela das quatro formas (fi 
gura 9), cujo endereco initial esta em 38144. As linhas de 
2000 a 2200 mostram os valores da tabela atraves de PEEK 
(figura 9), fazendo RUN em 2000. As linhas 50 a 160 plotam 
as figuras para SCALE = 20. 

As linhas 220 a 270 giram a figura 8 (quadrado dentro do 
outro), de a 360 graus, com intervalos de 459 no sentido de 
giro dos ponteiros do rel6gio; as linhas 280 a 330 fazem o in- 
verso, girando no sentido contrdrio aos ponteiros do rel6gio. 

As linhas 500 a 550 reduzem a forma da figura 5 de SCALE 
= 3 ate - SCALE = 5 e as linhas 560 a 610 a aumentam de 5 a 
30 no valor de SCALE. Finalmente, a linha 700 encerra o pro- 
grama, plotando a figura com o valor do ultimo SCALE (30). 

programa foi processado em um computador AP II da 
Unitron, com 48 Kb de mem6ria RAM e linguagem BASIC 
(Applesoft). 



BIBLIOGRAFIA 

1) POOLE, Lon; MCNIFF, Martin; COOK, Steven - Apple II 
User's Guide 

2) HEISERMAN, David - Intermediate Level Apple II Hand- 
book 

3) COAN, James S. - BASIC Apple BASIC 



Evandro Mascarenhas de Oliveira 6 M4dico e vem desenvolvendo suas 
atividades nas a" mas de Laboratdrio Clinico e Instrumentacao M6dica. 
£ usua'rio dos micros NE-Z8000 e AP II. 









Geravao de figuras 




+2*1+ 1,12 


5 HIMEM: 38144 


510 


SCALE- K 


1070 


READ TB: POKE EI + DB,TB 


10 


HOME : HGR2 


520 


DRAW 3 AT 140,85 


1080 


DB ■ DB + 1 


25 


GOSUB 1000 


530 


FOR L = 1 TO 50: NEXT 


1090 


IF TB < > THEN 1070 


30 


SCALE- 20: ROT= 0: HCOLOR- 3 


540 


ZDRAW 3 AT 140,85 


1100 


NEXT : RETURN 


50 


DRAW 1 AT 100,85 


550 


NEXT 


1150 


REM TABELA DA CRUZ (FORMA 


100 


DRAW 2 AT 70,150 


560 


FOR K = 5 TO 30 




1) 


150 


DRAW 3 AT 180,100 


570 


SCALE- K 


1200 


DATA 36,37,39,55,55,53,46, 


160 


DRAW 4 AT 200,50 


580 


DRAW 3 AT 140,85 







170 


FOR K - 1 TO 3000: NEXT : HGR2 


590 


FOR L = 1 TO 50: NEXT 


1250 


REM TABELA DO QUADRADO (FO 


220 


FOR K ■ TO 64 STEP 4 


600 


XDRAW 3 AT 140,85 




RMA 2) 


230 


ROT- K 


610 


NEXT 


1300 


DATA 44,62,0 


240 


DRAW 3 AT 140,85 


700 


DRAW 3 AT 140,85 


1350 


REM TABELA DO QUADRADO DE 


250 


FOR L « 1 TO 500: NEXT 


900 


END 




NTRO DO OUTRO (FORMA 3) 


260 


XDRAW 3 AT 140,85 


1000 


READ NF,EI,NB,B1,B2 


1400 


DATA 49,63,36,45,14,54,63,6 


270 


NEXT 


1010 


DATA 4,38144,256,0,149 




3,36,36,45,45,54,0 


280 


FOR K = 64 TO STEP - 4 


1020 


POKE 232, Bl: POKE 233, B2: POKE 


1450 


REM TABELA DO CINCO (FOR 


290 


POT= K 




EI,NF 




MA 4) 


300 


DRAW 3 AT 140,85 


1030 


DB ■ 2 * NF + 2 


1500 


DATA 37,39,5,0 


310 


FOR L = 1 TO 500: NEXT 


1040 


FOR I = 1 TO NF 


2000 


FOR K = 38144 TO 38182 


320 


XDRAW 3 AT 140,85 


1050 


12 ■ INT (DB / NB) :I1 « DB - 


2100 


PRINT K, PEEK (K) 


330 


NEXT 




NB * 12 


2200 


FOR L = 1 TO 500: NEXT : NEXT 


500 


FOR K - 30 TO 5 STEP - 1 


1060 


POKE EI + 2 * 1,11: POKE EI 
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Seduzido e abandonado. 



a e a historia do cavalheiro que comprou 
microcomputador que ia resolver todos 
problemas da sua empresa. 
precinho era bom e a conversa do 
dedor, atraente. Poucos dias depois ele 
obriu que o equipamento nao resolvia 
|&dos os problemas (pelo contrario, criava 

uns novos) e pior de tudo, ao voltar a loja 
|ode tinha comprado, percebeu que ninguem 
tendia realmente do assunto. 
outras palavras, ele foi lamentavelmeme 
uzido e abandonado. Mas nem tudo esta 
dido '• basia consultar a 
roshop antes de comprar um 
rocomputador. 



Microshop ouve antes de l alar. 
ros sao formidaveis, desde que sejam 
omendados exatamente para as suas 
:essidades. 



Porisso nos fazemos todo lipo de 
perguntas sobre a sua atividade, e o 
iratamento das informacoes para podermos 
acelerar o processo de tomada de decisoes. 
Nos achamos que quanto mais soubermos 
sobre o seu problema, mais facil e completa 
sera a nossa solucao. 

A Microshop da opinioes sinceras. 

Trabalhamos com todas as marcas e modelos 
importantes e nao temos interesse em 
"empurrar" esta ou aquela marca. Assim, 
voc8 tern a certeza de receber 
sempre um opiniao independente. 

A Microshop resolve mesmo. 

Ao inves de um simples balconista bem- 
intencionado, nos atendemos voce com gente 
formada em Computer Science na 
Universidade de Nova York. 



Isso que dizer orientac&o 
inteligente e correta na escolha do 
software mais adequado (tambem 
desenvolvemos programas especificos para as 
suas necessidades). Significa tambem colocar 
a sua disposicao nossa longa experiencia com 
profissionais liberals, empresas de pequeno 
porte e multinacionais. E mais: damos 
treinamento completo na utilizacao dos 
micros e softwares. 

Venha conversar conosco. Nos podemos lhe 
seduzir, mas n2o vamos nunca lhe abandonar. 




A loja dos micros inteligen 



Sao Paulo: Al. Lorena, 652 - CEP. 01424 -Tels: (01 1) 282.2105 - 852.5603. 
Recife: Av. Conselheiro Aguiar, 1385 - Loja 4 CEP. 50.000 -Tel.: (081) 326.1525 - Boa Viagem . 



PONHA ESTE 
NOME NA 
MEMORIA 




Softwares para TRS-80 e Apple 

Micro-computadores e 

Perifericos 

Assessoria e Treinamento 



RUA OFEU A, 248 - JD. PAULISTANO 

Fone: 2114261 

PONHA ESTE 
NOME NA 
MEMORIA 




Softwares para TRS-80 e Apple 
Micro-computadores e 
Perifericos 
• Assessoria e Treinamento 



RUA OFEU A, 248 - JD. PAULISTANO 

Fone: 211-4261 



*>4 



ALTA RESOLUCAO POR TABELA DE FORMAS 



Vamos f acilitar um pouco? 



Rudolf Horner Jr. 



Um outro colaborador nosso, Ru- 
dolf Homer Jr., fez um programa 
utilitario em BASIC (listagem l)que 
cria a tabela automaticamente sem 
que o usurfrio tenha que se preocupar 
com os apontadores e com as seque"n- 
cias de bits em cada byte. 

Quando o programa 6 executado, 
a tecla aparece no modo de baixa re- 
sol ucSo de gr'aficos e com um ponto 
de referenda bem no centre A partir 
dai, o usuario deste editor tern, no 
teclado, a seguinte se'ne de comandos: 

• Tecla I: faz o ponto de referenda 
subir. 

• Tecla J: faz o ponto de referenda 
ir para a esquerda. 

• Tecla K: faz o ponto de referenda 
ir para a direita. 

• Tecla M: faz o ponto de referenda 
descer. 

• Tecla S: liga/desliga a marcacao de 
pontos. 

• Tecla ESCAPE: indica que a for- 
ma estd encerrada. 

Utilizando estas teclas em conjun- 
to voce podera desenhar a forma que 
desejar. Quando o programa 6 acio- 
nado o dispositivo de marcacfo de 
pontos esta" desligado. Use a tecla S 
sem pre que quiser ligar ou desligar o 
marcador de pontos. Quando voce ti- 
ver terminado a forma pressione a 
tecla ESCAPE. 

Voce vera - que imediatamente sera 
acionada a tela de alta resolucfo gra- 
fica e a forma que voce acabou de 
editar sera" desenhada com ROT= e 
SCALE= 1. Uma legenda indicara 
quantos bytes foram usados na con- 
feccao de sua tabela. Para registra-la 
em disco use BSAVE NOME, A768,L 
NB. 

NBd o numero de bytes que a ta- 
bela consumiu. Para testa-la use o 
programa da listagem 2, que dese- 
nha a forma que voce acabou de pro- 
duzir e faz pequenas rotacOes com 
ela no sentido dos ponteiros do re- 
16gio. 

S6 mais um detalhe: o beep emi- 
tido pelo computador a cada dois 
passos no seu desenho serve para in- 
dicar que mais um byte foi usado em 
sua tabela de formas. 



Listagem 1 

10 REM EM TOR C'E ThBELAS DE FOP 

MA 
20 TEXT J HOME : NORMAL : SPEED* 

235 
30 POKE 232.0: POKE 233*31 REM 

DEFININDO H FIGURA PARA EN 

DERECO *3O0 r768 EM DECIMAL) 

40 POKE 768. tl POKE 769. 0« POKE 

770,4: POKE 771, 0«C ■ 771 : REM 

[>EFININt>0 INICIO DA TA6EL 
A DE FORMA 
30 OR :X - 19: V - 19: UTAB 21: HTAB 
11 PRINT "I - CIMA.M - BAIXO 
.J - ESQUER.K - DIREI" 
60 PRINT " ESC - PARA TERMINAR.S 
- LIGA-'DESLIGA": POKE 34.23 

70 FOR ft ■ I TO 8:BV<A> « 0: NEXT 

: IN - 
80 COLOR- 13: PLOT X.V: HOME : PRINT 

"COMANDO — > ":: GET H»: 



IF 



90 

100 
110 

120 
130 
140 

150 
160 

170 

180 

190 

200 

210 

220 
230 



H» 

H* 

H« 

> 

FOR 



< > "I" AND H* '. 

< > "K" AND H« < 

< > "S" AND ASC 
27 THEN 80 
A - 1 TO 3:B<A> - 

: IF H* < . > "8" 
IF S THEN S - 01 
S - H GOTO 80 
IF ASC <H*> - 27 THEN 230 
COLOR* Ss PLOT X.ViB<l> - S 



> "M" 
•H»-> < 



THEN 120 
GOTO 80 



AND 
AND 



IF H* 
<2> - 

IF H* 



•M" THEN V 



•I" THEN V 
IF H* - "J" THEN X 
<2> ■ HB<3> ■ 1 
IF H» » "K" THEN X 
<3> ■ 1 
IF NOT (IN> THEN FOR A 



HB 



1 

hb 



- X ♦ HB 



TO 3:EN. h ♦ 3> 
i IN - 1 : GOTO 80 
FOR A - 1 TO 3:EN<A 



B<A>: NEXT 



2> - B 
i IN » 0:8 = 8 
TO 8:B - B ♦ EN<A> 
<8 - A>: NEXT 
H POKE C.B: PRINT 



CHR» 



260 



10 
20 

se 



46 
50 
60 
70 
80 
90 

100 



<A>: NEXT 

FOR A - 1 
* 2 ~ 
C - C ♦ 

<7>«: GOTO 80 

GOTO 80 
C ■ C ♦ li POKE C.0tC - C ♦ 1 

i POKE C.01 REM ESTABELECEN 

DO O FINAL DA TABELA DE FORM 

A 

TEXT : HOME : HGR : HCOLOR= 

3: ROT= 0: SCALE= |l DRAW 1 AT 

120,60 

OTAB 21: PRINT "A TABELA CON 

SUMIU "IC - 7681" BVTES.": PRINT 

"PARA REGISTRA-LA: BSAUE NOM 

(,A76e.l "-'" - 768 

PRINT "POKE 232,0 : POKE 233 

.3": PRINT "DEFINA A ROTACAO 
E A ESCALm. ■ : 

GOTO 270 



Listagem 2 



HOME 

PRINT CHR* (4>I"BL(MD NOME- 
POKE 232.0: POKE 233,3: REM 

C-EFINIChO DO APONTMDOR DE Tft 

BELAS 
FOR A = 1 TO 5 
HGR2 

POT= 2 * A: SCALE= A 
DRAW 1 AT 140,60 
FOR B ■ 1 TO 20O0: NEXT 
NEXT A 

END ■ 
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ENSRG 





DOtll 





VOCE 




Aproxime-se. 

Voce vai penetrar agora em 

outra atmosfera. Vaientrar 

emcontato imediatocom 

microcomputadores, 

acessdrios e perifericos 

da* ultima geragao. 

Suapulsagac 

sera alterada. 

Porquea 




vibragao das pessoas que 

habitamestelugarvai 

contagiarvoce. 

Estamostransmitindo 

diretamentedanova 

ClappyCopacabana, urn 

espagotecnologico 

programado com precisao 

absoluta. 

Umaideiaquetomou 

forma decasaepousou 

sobreCopacabana. 

Exatamente a rua Pompeu 

Loureiro,99. 

Entre. 

Voce esta no centra do 

maior show room 

de microcomputadores 

do Rio de Janeiro. 

No2.°andarficaasalade 

treinamento, onde voce vai 

aprenderadominar 

e extrair o maximo de seu 

equipamento. 

Aquela luz forte la fora e o 

patio de estacionamento. 

Agora, sente-se. 

Voce vai receber a melhor 

mensagem deste anuncio: 

A-Clap-py-tem-o- 

me-nor-pre-go-do- 

pla-ne-ta. 

Ponhaestaideiana 

memoria. 

Agora, fixe os olhos em 

mim.Dentrode5 

segundos, eu vou sumir 

dopapel. 

Cambio. 

Desligo- 



Centro: Av Rio Branco, 12 - loja 

esobreloia 

RuaSetedeSetembro, 

88 -loiaQ (galena). 

Copacabma: Rua Pompeu 

Loureiro, 99. 

Tels (021) 283-3588- 
. 253-3395- 253-31 70 - 
L257-A396- 236-7175 



Os sistemas criptograficos via computador e a origem do DES, o ma is utilizado internacionalmente 



Criptografia, uma arma 
contra os piratas? — II 



Candido Fonseca da Silva 



Na pnmeira parte do artigo, pubhcada no niimero pas- 
sado, descrevemos os processos convencionais normal- 
mente utilizados em Criptografia. Nesta segunda e ulti- 
ma parte, passamos as suas possiveisaphcacoesemcomputadores. 
As t^cnicas cnptograficas atualmente empregadas em pro- 
cessamento de dados tern suas ongens no processo de substitui- 
c5o digital desenvolvido por Gilbert Vernan, ha mais de 60 
anos. Neste processo foram empregados os caracteres do codi- 
go Baudot de teletipo, c6digo este que representa cada carater 



por cinco bits. 








© 


1 


Texto em claro: 
Chave : 
Texto cifrado : 


1 1000 

10110 
01 110 


(A) 
(F) 
(C) 


1 



1 

1 



Figura 1 - Tabela-verdade do sistema Vernan 

A figura 1 mostra a tabela-verdade do sistema Vernan que 
configura o ou-exclusivo ou uma adicao moduIo-2. £ tambe'm 
um exemplo da criptografia do carater Baudot correspondente 
a letra A, com chave F resultando o carater C. Observe que 
Vernan cnou o que hoje conhecemos pox Criptografia online. 

A seguran9a deste sistema decorre do uso de chaves quase 
aleatonas de tamanho muito grande. Tais chaves eram obtidas 
pelo uso de dois lacos de fita de papel perfurado, de compn- 
mento j e k, sendo j e k niimeros pnmos entre si. 

Para cada ciclo de fita de compnmento j, a outra fita avanca 
um cara"ter, dando um compnmento total de chave j.k. Nos 



anos 20. valores de j e k foram 775 e 776, resultando um com- 
pnmento de chave igual a 601.400 caracteres. Pensando em 
computadores e em fitas magne'ticas para o armazenamento de 
chave. poder-se-ia ter j= 5xl0 6 ek= (5xl0 6 ) + l,o que 
permitina uma chave de compnmento da ordem de 2,5x10' 3 . 

Todavia, ja foi visto que grandes niimeros nao bastam para 
qualificar como seguro um sistema cnptografico. Realmente, 
o codigo Baudot leva a alfabetos-cifra tao n'gidos e previsi- 
veis como os alfabetos Vigenere (vide pnmeira parte do artigo). 
Mais ainda: se o mesmo trecho da chave for usado para cifrar 
duas ou mais mensagens, o uso de tecnicas estatisticas basea- 
das no l'ndice de coincidencia e nos testes-Qui (desenvolvidos. 
respectivamente, por Friedman e Kullback). perrrute uma cnp- 
toanabse com exito (references bibhograficas 1 e 2). 

Ale"m de Vernan, os trabalhos de Shannon, em 1948-1949 
(referenda bibhografica 3), sobre sistemas de segredo servem 
de fundamento teonco para a Cnptografia dos dias de hoje. 
Neles foi introduzida a nocSo de transformacdo misturadora, 
que consiste no emprego de produtos de transforma9(5es me- 
diante sucessivas substituiijOes e transposKjSes. 

Shannon definiu os pnnci'pios de confusdo e difusao basicos 
para impedir a ana'hse estatica de um cnptograma.e a ele deve- 
se ainda o conceito de distancia de unicidade, a qual representa 
a quantidade minima de textos cifrados que perrrute uma uni- 
ca solu^So. Ele provou que a distancia de unicidade para um 
sistema que use uma chave aleat6na que nunca se repita e m- 
fimta, tornandoocnptogramaimpossi'veldesercnptoanalisado. 

Os sistemas de afra de bloco empregam os produtos de 
transforma9ao aqui mencionados, e o sistema Lucifer, desen- 
volvido pela IBM, utiliza estruturas de hardware que reabzam 
a confusdo e a difusao preconizadas por Shannon. 
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NA ERA DO COMPUTADOR 

Antes de mais nada. uma pergunta: se existe urn sistema 
lmune a cnptoanahse, como o preconizado por Shannon, por 
que nao e adotado universalmente? 

A resposta esta nas dificuldades lojisticas envolvidas, a 
saber: gera^o e teste de uma chave puramente aJeatona, de 
compnmento infuiito (ou muito grande);os problemas em dis- 
tnbuir tal chave em seguranca aos usuanos (e os pengos de 
roubo. interceptacao, suborno etc. que acompanham tal dis- 
tnbuicW); a coordenacao que assegura o emprego uma linica 
vez de tal chave e outros fatores qu«» tomam extremamente 
oneroso este sistema, o que faz com que apenas instituicoes de 
grande expressao, e mesmo assim somente para assuntos muito 
criticos, possam utihza-lo. 

Agora, com a entrada dos computadores no quotidiano da 
Cnptografia, a busca de solucOes de compromisso (as quais 
consistem em utilizar mltodos que. nao obstante teoncamente 
imperfeitos, tenham conduces de resistir. por tempo suficien- 
te, a anahse do mimigo) ganhou alento. 

Dentre tais Processos destacam-se: a Cnptografia Algebnca. 
a Cnptografia por Chave Publica, as Transposicoes Polidimen- 
sionais e os Sistemas Comerciais, os quais veremos a seguir: 
1 . Cnptografia Alg^brica 

A idlia basica e efetuar substitutes de grupos de letras e 
nao letra a letra. Faz-se, micialmente. uma tabela de conversao 
letra-niimero: 



quatro letras. O mimero de passos por grupo cresce quadrati- 
camente de acordo com a f6rmula: S = n + (n-1), sendo S 
o mimero de passos e n o numero de letras dos grupos. 

Mesmo assim, a Cnptografia Algebnca vem mostrando uma 
resistencia excepaonal a cnptoanalise sempre que se escolhe 
uma matnz n x u, com n maior ou igual a 5. AtuaJmente exis- 
tem solucoes propostas para casos com n=23, utilizando 
computadores e admitindo como conheada a tabela de conver- 
sao letra -numero. 



B 



H 



M 



5 23 2 20 10 25 16 

NOPQRSTUVWXYZ 



19 



14 



Supondo substitutes por grupos de quatro letras, escolhe- 
se uma matnz 4 x 4 nao singular (determinante nao nulo) de 
inteiros como chave. Assim, existem dois elementos arbitranos 
na escolha da chave: a ordem da matnz (n x n, sendo n urn m- 
teiro qualquer) e a sua constituicao. Vejamos urn exemplo de 
matnz: 



8 6 9 5 

6 9 5 10 

5 8 4 9 

10 6 11 4 



A pamr dela vamos agrupar, de quatro em quatro. as letras 
da mensagem original: precisamos converter as letras em mi- 
meros (conforme a tabela de conversao, que e urn fator arbi- 
trary da chave) e calcular o produto da matnz A pelos vetores 
formados. modulo 26 (numero de si'mbolos doalfabetousado). 

A ti'tulo de teste, vamos cnptografar a palavra "dela": 



'dela" 



8 6 9 5 

6 9 5 10 

5 8 4 9 

10 6 11 4 



"Dela", cnptografada, resultou em "j c o w". 

Na de cnptografia, faz-se a multipbcac3o dos vetores do 
cnptograma pela matnz inversa (m6dulo 26) de A. 

O processo tern como pnncipal desvantagem o fato de exi- 
gir cinco operacdes por letra, ou seja, 20 passos por grupos de 
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"20, 


10, 


M 


, 5 
20 




[25 








10 


, 


2 








16 




3 








5 




14 












1— - 



INIMIGO 
(CRIPTOANALISE) 

x 



EXPEDIDOR 
(CRIPTOGRAFIA) 



GERADOR DE 
CHAVES N« 1 



■* P (Estimative 
de P) 



DESTINATARIO 
(DECRIPTOGRAFIAll 



: *n 



GERADOR DE 
CHAVES N« 2 



Legcnda: 

P ... Mensagem original 

C ... Criptograina 

K .. Chave de crlptografar (publica) 

Chave de decriptografar (privada) 



, D .. 



Canal inseguro (sujeito a acao do inimigo) 
Canal suposto inune a acao do ininigo. 



Figura 2 - Fluxo de informacoes nos sistemas de chave publica 



Monk Langa 

Sistema Gerador de Programas 



A Monk, a dois anos vem produzindo software para mi- 
cros, lanca uma inovacao para o mercado nacional, trata-se 
do s'istema"DATAMANAGER" que 6 urn gerenciador de ban- 
co de dados (SGBD).* Usavel como gerador de programas apli- 
cativos, e criado para ser utilizado por pessoas nao iniciadas 
em computac8o. O usua>io nao precisa conhecer a linguagem 
Basic ou Sistema Operacional, precisara apenas analisar seu 
problema e organizar uma solucSo pritica, com o manual do 
programa, que 6 super complete gerar seus programas apli- 
cativos. 

Exemplos de a"reas que \i estSo utilizando o sistema DA- 
TAMANAGER" - com grandes resultados: - Controle e ges- 
tflo de estoque, Contas a pagar e receber, Controle e adm. de 
vendas, Folha de pagamento, Controle de pedidos e fatura- 
mentos. Mala direta, Criacao e manutencao de cadastros e 
bancos de dados, Adm. de cl micas mWicas, dentirias e escri- 
tbrios de advogacia, imobiliaria (adm. de contratos, im6veis, 
condom fnios) e em construtoras (controle de custos de obras), 
Fazenda Agropecudria. 

Os programas podem interfacear com outros programas 
em Basic, arquivos do VisiCalc e SuperScripsit. Este super 
programa roda nos micros CP500, NAJA e TRS-80 III, com 
48K - 2 disk-drives e uma impressora opcional se preferir 
obter listagens impressas. ^ m 

Demonstracoes e maiores detalhes nos 66 revendedores 
Monk por todo pais, ou diretamente & Monk, Rua E. 

• E*ta programa foi leslado na ravnta Micro Mundo do m«i da Agotto. n9 6 

* * Ralacio doi revendedores na revista Micro Sittemat do met da Agotto. n9 23. 



mOnk micro inform&tica ltda. 



R Augusta. 2690 • 29 And. L.318e324 
Telt.: 280-0163e 852-2958 SP 



monk, 

o software que faz voce ficar 

feliz por ter um micro. 




CRIPTOGRAFIA, UMA ARMA CONTRA OS PIRATAS? - II 



2 . Criptografia por Chave Publica 

Por volta de 1975, Diffie e Hellman propuseram um tipo de 
sistema criptografico que forcou a uma nova definicSo de in- 
quebrdvel ou imune a criptoandlise. Tais sistemas nao sao 
tao imunes como a cifra proposta por Shannon. Contudo, na 
pratica, o esfor^o computacional exigido torna invia'vel qual- 
quer tentativa, por parte do inimigo, de soluaonar as cifras 
cnadas, tomando-os, portanto, computacionalmente inquebrd- 
veis. 

Na figura 2 podemos ter uma visao do fluxo de informacdes 
em tal sistema cnptografico. Observe que ele rmnimiza o pro- 
blema da distnbuicSb de chaves, criuco em todos os demais. 

Uma aphcacao para sistemas de chave publica foi feita por 
Rivest, Shamir e Adler (sistema RSA), utilizando numeros pn- 
mos. sistema RSA apresenta a vantagem suplementar de per- 
mitir ao remetente autenticar a sua mensagem por meio de 
uma assinatura eletronica fornecida pelo pr6pno RSA. 

3. Transposicoes Polidimensionais 

Como extensfo as transposicSes por rota (vide "Criptogra- 
fia a lapis e paper, primeira parte do artigo), tem-se as trans- 
posicoes por circuitos hamiltonianos em hipercubos. 



Dimensao 


Tra jetos 


Hamilt. 


Circuitos Hamilt. 













1 










2 


2 




2 


3 


144 




96 


4 


91.392 




43.008 


5 


(*) 




(*) 



Figura 3 - Circuitos e trajetos hamiltonianos em hipercubos. (*) - Para 
n = S,estima-se em mais de um mes o tempo de computacao necessdrio 
para obter os dados. 



Circuitos hamiltonianos formam codigos de Gray, que po- 
dem ser gerados por software de forma relativamente simples. 
Outra raza"o para o emprego de transposicoes polidimensionais 
em Criptografia € evidenciada na tabela da figura 3, onde pode- 
mos observar ser marcante o aumento do numero de trajetos 
e arcuitos com o aumento da dimensSo. Outra vantagem e* que 
o usua'no autorizado na"o necessita gerar todos os possiveis tra- 
jetos em hipercubos de ordem 10, por exemplo. Ele necessita 
apenas gerar alguns milhares, uma tarefa relativamente simples, 
deixando para o inimigo o trabalho de gerar e testar todos os 
trajetos, o que, para a dimensao 10, € praticamente lmpossi'vel. 
4. Sistemas Comerciais 

A grande maioria dos sistemas cnptograficos comerciais 
gera chaves que, £ primeira vista, parecem aleatonas. No entan- 
to, elas sao pseudo-aleat6nas. 



Operacao 
(6378) 2 


Quadrado 
40678884 


Sequencia 


Pseudo- aleatoria 




788 


788X6378 


5025864 




258 


258X6378 


1645524 




455 


455X6378 


2901990 




019 


019X6378 


121182 




211 







Figura 4 
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Os pnmeiros algontmos para a producao de sequencias 
pseudo-aleat6nas por computador surgiram nos anos 50. A 
chave resultante era deterministica, e cnada a partir de proce- 
dimentos, tais como o do meio do quadrado. Na figura 4 te- 
mos um exemplo. 

Veja que a seque"ncia 7-8-8-2-5-84-5-5-0-1-9-2-11 6 aparen- 
temente aleat6na, mas, na verdade, ela 6 totalmente determi- 
nada. 

Atualmente, a maiona dos sistemas utiliza shift-registers 
que geram sequencias pseudo-aleat6rias, na"o deterministas, 
mas markovianas. Shift -registers comeraais sao cascatas de 
se"nes de estagios binanos, e o ciclo maximo da sequencia 
pseudo-aleat6na (2 n -l), para um total de 20 estagios, da" um 
ciclo de chave de 1 .048.575 bits. 

Formas de se quebrar sistemas cnptograficos com base nes- 
tas sequencias de chaves sSo objeto de diversos artigos existen- 
tes na literatura. 

O LUCIFER E O DES 

Na virada dos anos 60-70, a IBM instituiu um programa 
de pesquisas para o desenvolvimento de sistemas cnptograficos 
para uso em sua linha de produtos. Tais pesquisas conduziram 
ao sistema de cifra em bloco (cnado por Feistel, Notz e Smith) 
que tinha, como um de seus componentes, uma unidade de 
hardware para cnptografia denominada Lucifer. 

Alguns arcuitos da Lucifer utilizavam estruturas de substi- 
tuicao e transposicao que, efetivamente, realizavam a difusdo 
e a confusdo pregadas por Shannon. Este sistema cnptografico 
serviu como ponto de partida para o padrao de criptografia de 
dados (Data Encryption Standard - DES) projetado pela IBM 
e adotado pelo NBS (National Bureau of Standards) dos Esta- 
dos Unidos. 

O DES e" um sistema de cnptografia que emprega blocos de 
cifras que constituem um conjunto de 64 bits sob o controle 
de uma chave de 56 bits. O mesmo algontmo e a mesma chave 
adotada na cnptografia da mensagem s3o usados para recupe- 
rar o texto em claro. 

O bloco de dados a ser cifrado passa lnicialmente por uma 
permutaca"o denominada IP e, em seguida, por uma permuta- 
cao dependente da chave (bastante complexa); finalmente, 
passa por uma terceira permutaca"o IP -1 , que e o inverso da 
computaca"o inicial. Na nota^So do NBS, a computacao depen- 
dente da chave e* definida por uma funcao f, chamada funcao- 
cifrar; uma outra funcao — KS - cria a forma pela qual a chave 
aparecera - como um dos argumentos da funcfo f. 

Maiores detalhes sobre o algontmo podem ser encontrados 
nas references bibhogrdficas 4 e 5. 

O DES foi implementado por diversos fabncantes de cir- 
cuitos integrados nos Estados Unidos, o que torna sua utiliza- 
?ao facil e barata. Sao eles: 

a) Fairchild - O Fairchild 9414 consiste de quatro chips e usa 
tecnologia I 2 L. Possui a maior velocidade de funaonamento, 
ou seja, cinco microssegundos por bloco. 

b) IBM - Dispositivos de hardware acoplados apenas a siste- 
mas completos. 

c) Texas - O Texas Instruments TMS 9940 € um dispositivo 
da familia 9900 de microprocessadores de 16 bits e consiste 
de um firmware adaptado a um processador 9900; seu tempo 
de cifragem e de 13 milissegundos, incluindo a entrada e a sai- 
da de dados. 

d) Motorola - O Motorola MGD 8080 DSM ou o MGD 6800 
DSM sa"o chips que podem ser utilizados com o 8080 ou com o 
6800, respectivamente. Funcionam como penfe*ncos e pos- 
suem dois registradores para chaves: um para a chave mestra e 
outro para a chave de trabalho; permitem o duplo enciframen- 
to e tern um tempo de 130 microssegundos para o processa- 
mento de um bloco de texto. Sua tecnologia 6 N-MOS. 
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el Intel - Intel Data Encryption Unit 8294 6 semelhante, 
em concepcSo, ao equipamento da Texas, pordm nSo possui a 
capacidade de manipulacSo de chaves, necessitando ainda de 
um processador separado para seu funcionamento. Seu tempo 
de cifragem de um bloco £ de 100 milissegundos. 
Rockwell - Rockwell Collins CR-300 £ um sistema de 
cnptografia (um cartffo) que possui uma memona alem do 
chip que permite o armazenamento de 32 chaves em forma ci- 
frada. Uuliza tecnologia p-MOS com um tempo de afragem 
por bloco de 40 microssegundos, sendo compati'vel com os 
processadores 8080, 6800 e 6500. 

g) Western Digital - O Western Digital DE 20001/2 i um chip 
em duas versoes de 28 ou 40 pinos. A diferenca basica i a 
existenaa de uma porta dual que permite enviar dados por 
uma delas e capturar a mensagem cifrada pela outra. Seu tem- 
po de afragem I de 48 microssegundos, possui condicOes para 
entrada e manipulacao de chaves e £ compati'vel com o 8080 e 
oZ80. 

Sobre este chip gostan'amos de fazer mais algumas conside- 
racOes. A investida da Western Digital na area de Cnptografia 
deu ao mercado um sistema de velocidade consideravel que 
permite ser aplicado diretamente em sistemas de terminals ln- 
tehgentes com arquivo em disquetes. Atem disso, projetou uma 
especie de kit de cnptografia que pode ser acoplado em qual- 
quer microprocessador, agmdo apenas como mais um pente- 
nco. 

CONCLUSAO 

A partir da decada de 60, em virtude da expansao do tele- 
processamento, a pesquisa de sistemas cnptograficos para da- 
dos foi intensificada. 

V4nos trabalhos foram e vem sendo desenvolvidos visando 
certificar a seguranca do DES. Em pesquisas realizadas por 
Hellmann e outros, foram encontradas algumas simetnas que 
levam a cnar suspeitas sobre as estruturas, pnncipalmente das 
chamadas caixas S (S-boxes), as quais contem, basicamente,o 
cerne do sistema. 

Outro ponto levantado por Hellmann e o fato de que nem a 
NBS nem a IBM liberaram qualquer informacao sobre a estru- 
tura do DES na forma em que este foi projetado. Por isto exis- 
te, na comunidade cienti'fica, uma certa descren9a quanto a 
seguranca do sistema, uma vez que parte das informacoes so- 
bre ele £ mantida em segredo. 

Mesmo assim, o governo amencano propos que o DES fos- 
se usado em comunicacOes federals onde o ni'vel de seguranca 
n3o fosse considerado exagerado. A maiona das empresas pn- 
vadas tambe'm o tern escolhido para implantacao de sistemas 
de comunicacSo de dados, visto ser o linico conheado para 
esta finalidade. 

Entretanto, uma questao deve ser levantada. Como o conhe- 
ado "Problema da Mochila" - onde uma sequenaa de dados £ 
empregada para afrar uma mensagem a qual apenas o possui- 
dor da chave poderd deafrar -, pode-se considerar que este 
tipo de sistema contenha alguma armadilha (o nome do pro- 
blema, em ingles Trapdoor Knapsack, sugere que existe uma 
armadilha). Mais grave ainda, esta armadilha pode se encontrar 
nas maos dos homens que a projetaram ou com os possiveis 
possuidores da estrutura do projeto. 

Tal possibilidade na"o pode ser descartada, mas qual seria a 
solu?a"o? O desenvolvimento de um novo sistema ou a utiliza- 
cSo da estrutura do DES com algumas modificacOes que difi- 
cultassem o acesso a um conhecedor da armadilha? 

Seja como for, o mais importante £ que, atravds da Cnpto- 
grafia, o usuririo de micros dispOe de uma ferramenta para pro- 
teger o sigilo de suas informacoes, quer pelo uso de processos 
que remontam a Antiguidade, quer pelo uso de te'cnicas dos 
dias de hoje ; quer as informacoes a proteger sejam arquivos de 
dados ou programas. 
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Enfim, acreditamos que podemos responder afirmativamen- 
te a pergunta do titulo deste artigo: sim, Cnptografia £ uma 
arma contra a piratana do software. 
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Agora que voce acabou de ler a parte final do artigo de Criptografia, 
que tal ter urn programa arquivado em urn cdd/'go particular??*. ! 



Programe em segredo 



Roberto K. Heringer 



Este programa, desenvolvido no 
D-8002 e com 1573 bytes, si- 
mula uma tdcnica criptograTica, 

codificando e decodificando uma men- 
sagem atrave*s de um codigo espectfico, 
predeterminado. 

Por exemplo, se voce digitar a frase 
REVISTA MICRO SISTEMAS, o pro 
grama a transformara - em PZVAUXKY 
CALPRWUAUXZCKU, e assim por 
diante. Para decodificar, basta fazer o 
inverso, ou seja, digitar a frase codifi- 
cada que o programa a traduzirj. 

A mensagem a ser traduada pode ter 
o tamanho que voce quiserje' necessdrio, 
apenas, que voce digite uma frase de ca- 
da vez, seguida do comando ENTER. 

Uma caracterfstica interessante deste 
programa 6 que voce" pode mudar, se de- 
sejar, os caracteres considerados, cifran- 
do o seu pr6prio c6digo. Voce deve, in- 
clusive, usar mimeros ao invds de letras, 
o que o tornara bem mais inacessivel. 

As aplicacGes deste programa s3o inu- 
meras. De uma simples brincadeira, ele 
pode ser utilizado para arquivar relat6- 
rios secretos, manter diilogos confiden- 
ciais, programas em um codigo particu- 
lar... Neste ponto, voce 6 quern decide. 



Roberto K. Heringer 4 T4cnico-qui'mico e li- 
cenciado em Socio logia. Atua/menw desempe- 
nha a funcao de assessor na divisSo tSxtil do 
grupo Heringer. Utilize microcomputadores 
tan to no trabalho como na tese de doutorado 
que est* desenvolvendo. 



Programa de Codigos 



,'. REM PROGRAMA DE CODIGOS : 
AUTCR - ROBERTO K. HER INGE 
R 

1 CLEARS 00 C 

2 OLE: PR I NT "PARTE A REQUERER 



CODIFICACAC" 
DECCDIFI CACAO" 



3 PRINT"!. 

4 PRINT "2. 

5 INPUT'.' 

6 IFV--=1THEN11ELSE133 

11 CL2 

12 INPUTA* 

13 FORX«lTOLEN(At: 

14 B-LEN(A»: 

15 c*=mid*<a*,:c :: 

16 JK«RND(50):IFJK<2STHENFt- 
"W"ELSEF»*"Y" 

17 30TC1C2 
10 PR INTO*? 

102 I FC*=" A" THENLPRI NT" I; "; 

103 IFC$ = "E-:"THENLPRINT"M"; 

104 I FC%^" " THENLPR I NT "L" J 

105 IFC*="D"THENLPRINT"N"" 

106 IFC*="E"THENLFRINT"Z"; 

107 IFC$="F"THENLFRINT" I " I 
102 IFG»* M G"THENLPRINT"H"S 

109 irC*="H"THENLPRINT"G"; 

110 I FC*=" I "THENLPR I NT "A" J 

111 IFC$ = "J"THENLPRINT"D"-. 

112 IFC*«"K"THENLPRJNT"B H J 

113 IFC$="L"THENLPRINT"E" ■ 

114 IFC*="M"THENLPRINT"C"J 

115 IFC$="N"THENLPRINT"F" J 
11£ IFO$="0"THENLPRINT"R"; 
117 XFC*«"P" THENLPR I NT " " i 
HE IFOt="0"THENLPRINT"C"; 

119 IFC$^"R"THENLFRINT"P"; 

120 IFC*^"S"THENLPRINT"U"; 

121 I FC*= " T " THENLPR INT":.'": 

122 I FC*=" U"THENLPRINT"T"; 

123 IFC$ = "V" THENLPR I NT " V" t 

124 IFC*="X"THENLPRINT"2"; 

125 IFC*="Z"THENLPRINT"J": 

126 IFC*=" "THENLPR I NTF*; 

1 27 I FC*= " . " THENLPR INT". " 
122 IFC*^"; "THENLPRINT">"; 



129 


IFC*="-"THENLPRINT 


i . ■■ . 


131 


NEXT 




132 


LPRINT 




133 


INPUT"+ PALAVRAS + 


";h$: 




IFH*-"SIM"ORH$="S" 


RHEN12 




ELEEEND 




13S 


CLS 




139 


INPUTAS 




140 


F0RX=1T0LENCA«) 




141 


G=LEN(A«> 




142 


C*=MID$(A*,X, 1) 




143 


G0T0200 




200 


I FC*= " K " THENLPR I NT 


•A"; 


201 


IFC*="M"THENLPRINT 


•B"; 


202 


IFC*="L"THENLPRINT 


•C"l 


203 


IFC*="N"THENLPRINT 


•D"; 


204 


IFC*=-"Z"THENLPRINT 


•E"; 


205 


IFCt="W"THENLPRINT 


i .. . 


206 


IFC$="Y"THENLPRINT 


' " t 


207 


IFOS="I"THENLPRINT 


■F"; 


202 


IFC*="H"THENLFRINT 


•G"; 


109 


IFC*="G"THENLPRINT 


'H'\: 


210 


I FCS=" A" THENLPR I NT 


•I"; 


211 


IFC*="D"THENLPRINT 




212 


IFC*="B"THENLPRINT 


'K"; 


213 


I PC* ="E" THENLPR I NT 


' L " " 


214 


IFC*="C"THENLPRINT 


'M"S 


215 


IFC*="F"THENLPRTNT 


N"; 


216 


IFC*= "R"THENLPRINT 


•0"; 


217 


IFC*="Q"THENLPRINT' 


P"; 


212 


IFC*="0"THENLPRINT 


Q"; 


219 


I FCS="P" THENLPR I NT' 


R": 


220 


IFC*= "U" THENLPR I NT' 


S"; 


221 


I FC* = ":.'" THENLPR I NT* 


T"; 


222 


IFC*="T"THENLPRINT' 


U"J 


223 


IFC*-"V ,, THENLPRINT' 


V"; 


224 


I FC*^ "2" THENLPR I NT' 


:c" i 






z " ■ 


226 


IFC*^" ;"THENLPRINT' 


• " > 


227 


IFC*=-".: " THENLPR I NT' 


. " j 


222 


IFO*^":"THENLPRINT' 


-•• t 


229 


NEXT 




230 


LPRINT 




231 


INPUT" + PALAVRAS + 


".:F«: 




IFF*="0IM"0RF$="G"THEN13 




9EL2EEND 


■ 
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A IBM ESTAOFERECENDO PIPOCAS, BALOES 

DE BORRACHAE ALTATECNOLOGIA 

NA FEIRA DE INFORMATICA83. 



ii 







Voce e sua familia estao convidados para um passeio 
pelo future. 

Visite o stand da IBM na III Feira Internacional de 
Informatica. mstalada no Pavilhaode Exposicoesdo 
Parque Anhembi. de 1 7 a 23 de outubro de 1 983. 

Enquanto seus filhos se divertem com balbes de 
borracha. comendo pipoca ou brincando com computadores. 
manipulando um sistema de verdade. voce vai ter surpresa 
sobre surpresa, a cada passo. a medida que avanca pelo 
stand da IBM. 



Voce vai descobrir a evolucao dos sistemas de 
computacao e as mais avancadas conquistas tecnologicas 
no campo da Informatica. 

Sob o tema "IBM - Alta tecnologia aqui. agora e para o 
futuro". a IBM mostra tudo o que tern feito no Brasil e oque 
podera fazer. em termos de Informatica. 

Nao perca este programa tao deslumbrante quanto 
instrutivo. 



==^:I ? = Alta tecnologia aqui. agora e para o futuro. 



Consdrcio ou financeira? Se voceainda esta" na duvida, consulte seu micro 
da linha TRS-80 Model o I ou III. Ele I he dira" qua I a melhor opcao 



Calcule os juros e 
decida melhor 



L. C. Lobato 



Digamos que voce ja" tenha sido atropelado por urn ven- 
dedor de consdrcio, e que ele quase o convenceu de 
que este e" o melhor negdcio do mundo para se com- 

prar um carro novo, melhor do que recorrer a uma financeira. 

E o papo dele 6 bom: o consdrcio comeca com uma presta- 
cao baixa, a prestacao da financeira 6 salgada; a prestacao do 
consdrcio vai aumentando suavemente e voce ainda pode ante- 
cipar prestacoes do consdrcio (as ultimas, e claro) etc. etc... 

Bern, ai voce fica na duvida, faz as contas do ponto de vista 
do vendedor, pega o coeficiente da financeira (se assusta com a 
prestacao), multiplica, soma, subtrai e... continua na duvida. 
Para ajudi-lo, vem um amigo e diz: "Nao vai nessa que 6 fna. 
Tern gente querendo ate - dar a cota do consdrcio porque nao 
aguentar pagar! £ que nem BNH...".Chegaoutroediz:"Voce ji 
fez as contas dos juros da financeira? ii viu o valor final do 
carro? No consdrcio voce nao paga juros!" 

Nesse ponto voce desiste e apela para seu micro, amigo fiel 
de todas as horas. Frio, calcuhsta e impessoal, o micro lhe 
apontara a melhor opcao. 

programa Cdlculo de Juros iri ajudd-lo a tomar esta difi- 
cil decisao. Ele tern tres funcoes: 

1 — Projecao de um valor atual no futuro 

Essa opcSo, no nosso exemplo, e" a do consdrcio. Voce tern 
o valor atual da prestacao, sabe que ela cresce de acordo com 
os reajustes mensais do preco do carro desejado, a uma taxa es- 
timada, e sabe o numero de meses do piano do consdrcio. Cada 
prestacao sera" calculada de acordo com a fdrmula: 



onde: 



Pi = P (1*t x ) 



Pj = valor da prestacao i 



i = 1,?,3,...,n mucro da prestagao 

t x = taxa mensal de reajuste 

Pq = prestagao inicial (ea geral, e a 

entrada) 

2 - Valor presente de prestacoes mensais 

Essa opcao, de acordo com nosso exemplo, 6 a da financei- 
ra. £ conhecido o valor fixo da prestacao, a taxa mensal de ju- 
ros e o numero de meses. valor presente € o valor correspon- 
dente a cada prestacao se ela fosse paga hoje. £ calculado pela 
fdrmula: 

v x = P/<l+t x ) 

onde: 

Vj = valor presente da prestacao I 

i = 1 , 2 , 3 , . . . , n=numero da prestacao 

t x = taxa de juros ao aes 

P = valor fixo da prestacao 

3 — Projecao comparativa entre as opcoes 1 e 2 

Com esta opcao, voce tern a comparacao entre as duas ante- 
nores, e podera" analisar mes a mes o que esta" acontecendo. 
resultado sai com o seguinte formato: numero do mes, valor 
atual do consdrcio, prestacao da financeira, diferenca consdr- 
cio/fmanceira, valor presente da diferenca e valor acumulado 
do valor presente da diferenca. 

programa foi desenvolvido em um DGT-100 com 16 Kb 
de memdna, cassete e impressora. Roda, portanto, em qual- 
quer micro da familia TRS-80 Modelos I e HI, tais como: 
D-8000/1/2, CP-500, CP-300, Naja, JP-01 e JR Sysdata. Se vo- 
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ce possuir disco, pequenas modificacoes deverao ser feitas nos 
comandos que testam o status da impressora. 

COMO OPERAR O PROGRAMA 

Apos RUN, voce devera" informar o numero da opcao dese- 
jada. Se escolher a 3 voce passara" obngatonamente pelas 1 e 2. 
Em cada caso, atem de informar valores das prestacoes, as ta- 
xas e os prazos, e" feita a pergunta O VALOR DO PR1MEIRO 
MES E* CORRIGIDO (S/N)?. No caso do consdrcio, normal- 
men te o primeiro pagamento e" a vista, logo, e" valor atual. Voce 
devera", portanto, responder N; no caso da financeira, normal- 
mente o primeiro pagamento i feito 30 dias ap6s a data, logo, 
voce devera" responder S. 

O calculo serf feito de acordo com as formulas descntas an- 
tenormente e os resultados mostrados na tela. Ale"m dos valo- 
res mensais, serao calculados dois totais: TOTAL GERAL e 
PRODUTO. primeiro 6 a soma das parcelas calculadas; o se- 
gundo e" o numero de parcelas multiplicado pelo valor sem cor- 
recao. No caso do cons6rcio, corresponde ao valor total do 
carro; no caso da financeira, 6 o valor total do financiamento. 

Em seguida o programa pergunta se voce deseja impnmir ou 
nao. Caso voce responda S, o programa pergunta se a impresso- 
ra esta" OK. Se estiver, aperte a tecla RETURN (ou ENTER). 
programa testa o status da impressora, que podera" vanar de um 
computador para outro, dependendo do Sistema Operacional, 
do tipo da impressora e da forma de ligacSo ao micro. Caso 
nao esteja OK, ele devolve o status encontrado e pergunta de 

novo se esti OK. 

Se voce escolheu a opcao 3, depois de responder as quest oes 
das opcoes 1 e 2, voce podera" alterar os valores calculados da 
opcao 1. Para tanto, siga as instrucoes do programa atenta- 
mente. 

Caso o valor total das parcelas (TOTAL GERAL) seja alte- 
rado em consequencia dessas modificacdes, sera" ermtida uma 



mensagem de advertencia, com os valores anterior e atual. Se 
estiver OK, responda S; se na"o, responda N, e voce poderi alte- 
rar novamente as parcelas que quiser. 

Depois dessa escolha, serao impressos automaticamente os 
valores comparados mes a mes. A impressora devera" estar pron- 
ta, pois o programa na"o vai testar o seu status agora. 

DESCRICAO DE COMANDOS E VARIAVEIS 

Seguem, adiante, alguns comentanos sobre os comandos 
mais importantes do programa: 

10 - reserva a^ea para as varia"veis que sera"o 

usadas para o cdlculo das prestacSes; hmite = 
50 prestacSes; 

40 a 70 - seleciona a opcSo desejada; 

80 a 90 - executa as sub-rotmas de acordo com a opcao ; 
1000 a 1060 - calcula a opcao 1; 
1 200 a 1260 - bsta no video os resultados da opcao 1 ; 
1 500 a 1 560 - rotina de DUMP de video para a impressora; 
2000 a 2060 - calcula a opcao 2; 
2200 a 2260 - hsta no video os resultados da opcao 2; 
3000 a 3020 - calcula as opcoes 1 e 2 ; 
3200 a 3330 - hsta no vfdeo os resultados da opcao 3; 
3500 a 3530 - rotma de montagem da hnha de impressao; 
4000 a 4140 - rotma de alteracao das parcelas da opca"o 1 . 

Agora, vamos descrever as varidveis usadas no programa: 

VI #(50) - valores mensais do cons6rcio; 
V2#(50) - prestacSes mensais da financeira; 
VA # - valor atual do cons6rcio; 
Tl # - taxa de reajuste mensal do cons6rcio; 
Ml - numero de meses do cons6rcio; 
PM # - prestacfo mensal da financeira; 
T2 # - taxa de juros mensal da financeira; 




E SOFTWARE HOUSE 

SISTEMAS EM LANCAMENT0 

Emissao de contratos de compra e venda de imoveis 

Administracao de imobiliarias 

Classificapao inter nacional de doencas 

Ultrassonografia 

Controle computadorizado de clientes (consultorio) 

Comunicacao de dados 

Mercado aberto (open) 

Controle bancario Copec 

Controle de estoque - Copec 

Jogos Copec 

Administracao de bibliotecas 

Software IBM 4331/4341 - Sistema integrado, ON-LINE 

REAL TIME, para suporte operacioanal e administrative 

das areas comercial e financeira de empresas. 

Sistema Copec de monitoracao e comunicacao para 

terminals telex. 
Curso de Basic - Copec I 

R. Dr. Jo«* Pereira de Quairdz, 1 10 - Pacaembu • Em fraota 4FAAP 



CURSOSOFERECIDOS 

Introducaoi Eletr6nica Digital 

Hardware de Microprocessadores Z.80 

Assembler de Microprocessadores Z.80 

Introducao aos Microcomputadores 

Basic 

Hardware de Microprocessadores 8080 

Assembler de Microprocessadores 8080 

CP/M 

Possibilite ao seu computador pessoal da linha 
Apple utilizar o sistema CP/M, beneficiando-se 
de uma enorme quantidade de programas para 
uso geral. Placa CP/M, manual, sistema opera- 
cional. 



REVENDEMOS 

Dismac - compatfvel Apple 

Polymax 

Micro-Engenho 

TK-85 

Unitron 

Sysdata 

Ego 



COBOL ANSI 

Na COPEC S.A. o seu computador 

pessoal tambem utiliza COBOL ANSI, 

Consulte-nos. 

Livros, revistas, disquetes, reguas de 

Fluxograma formuldrios contmuos. 



Calculadoras Videogames 
Dactari Joy Stick 

ACESSORIOS E PERIFERICOS DIVERSOS: 

Impressoras 
Placa Videx 

Interligacao de micro com maquina de escrever 
Monitores de vfdeo adaptados 
Modems' ^^^ 

M6veis para computadores 
Arquivos para disquetes 
Fitas para impressoras 
Placa de expansao - 1 28K., para utilizacao 
de Visicalc expandido. 
Tels.: 66-0245 670063 67-6369 
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CALCULE OS JUROS E DECIDA MELHOR 



M2 - numero de presta96es da financeira; 

CI # . C2 # , C3 # , C4 # , C5 # - valores calculados para 

relat6no. 

UM EXEMPLO REAL 

Foi-me apresentada a opcao de compra de um carro da 
marca Corcel atrave"s de consorcio, onde o valor atual da pres- 
tacao (Abril/83) era de Cr$ 74.600, em 50 meses. Era suposto 
um reajuste mensal de 8% das prestacfies (acompanhando a 
ORTN). 

Por outro lado, tinha-se a opcao de uma financeira em 24 
meses, com o coeficiente de 0,09812, o que devena correspon- 
der a uma taxa de aproximadamente 8% ao mes. 

Acontece que na financeira voce retira o carro lmediata- 
mente, e no consorcio, para ser capaz de retirar o carro no pn- 
meiro mes, sena necessano um lance de 17 presta?oes no mi- 
nimo (isto, segundo o vendedor do consdrcio), restando, en- 
tao, 33. Considerando esse valor tambe'm como entrada na fi- 
nanceira, o saldo a ser financiado sena da ordem de Cr$ 2 mi- 
lhoes, o que dana uma prestacSo de Cr$ 196.240 por mes, em 
24 meses. 

Observe que, no caso do consorcio, a pnmeira prestacao 6 
de Cr$ 74.600, a segunda, Cr$ 80.567, assim por diante, ate" a 
33? , que e de Cr$ 875.586, supondo reajustes mensais de 8%. 

O TOTAL GERAL e a soma de todas essas parcelas reajus- 
tadas calculadas mes a mes. O PRODUTO 6 simplesmente 33x 
74.600, ou seja, o valor do saldo do consorcio hoje, se voce 
fosse quita-lo. 

No caso da financeira, o valor da pnmeira prestacSb, em va- 
lor presente, 6 de Cr$ 181.703, da segunda, Cr$ 168.244, e 
assim por diante, ate* a 24^ que £ de Cr$ 30 946. 

O TOTAL GERALe a soma do valor presente de todas elas. 
Note que esse total devena dar Cr$ 2 milhSes, se a taxa fosse 
exatamente 8%. Devido a erros de arredondamento, ou devido 
a taxa nao ser exatamente 8%, deu uma pequena diferenca de 
Cr$ 66.163. O PRODUTO 6 24x196.240, que 6 o valor total 
do financiamento. 

Na projec2o comparativa mes a mes, o cons6rcio comeca no 
mes zero (entrada de Cr$ 74.600) e a financeira comeca no 
mes um. Observe que a prestacSo do cons6rcio alcanca a da fi- 



nanceira no mes 13, e a partir dai'a diferenca acumulada dimi- 
nui, mudando de sinal a partir do mes 27. Resultado: o consor- 
cio da" um prejuizo de Cr$ 395.637 em moeda de hoje (valor 
presente da diferenca acumulada). 

Ja* dava para perceber essa diferen?a apenas comparando o 
produto do consorcio (Cr$ 2.461.800) com o TOTAL GE- 
RAL da financeira (CrS 2.066.183), porque ambos estao cal- 
culados em valor presente. Com efeito: 2.461.800 — 2.066.183 
=395.637. 

Aleluia! Funciona! 

Bom, ai' vem o vendedor do consorcio e contra-ataca com 
um argumento fulmmante: "Doutor, o senhor pode pagar an- 
tecipadamente algumas presta9oes e reduzir a quantidade de- 
las, abatendo justamente as ultimas, que sao as maiores." 

Tudo bem, de volta ao micro! Para venficar mais essa alter- 
nativa, teremos que alterar os valores calculados para a opcao- 
do consdrcio. Supondo-se que as seis pnmeiras presta?6es do 
cons6rcio sejam pagas em dobro, teremos apenas 26 prestacSes 
ao todo no cons6rcio. 

Como era esperado a diferen9a muda de sinal vanas vezes 
devido a antecipacSo das presta96es, que faz com que o valor 
delas se aproxime mais rapidamente do valor das presta9des da 
financeira, e a diferen9a acumulada fica a favor da financeira 
mais cedo. Resultado: o cons6rcio da* um prejuizo de 
Crf 395.631 ! £ praticamente o mesmo resultado anterior com 
um erro de arredondamento de seis cruzeiros. 

Bem, nessa altura do campeonato, a escolha e sua. O micro 
ja" fez (e muito bem feito. mode'stia a parte) o que lhe cabia. O 
resto e" com voce. 

E eu, o que fiz? Resolvi nao trocar de carro, porque nao 
podena pagar nem um nem outro. Paciencia... E quanto a vo- 
ce, entre com os dados de seu caso especiTico e boa sorte! 



Luiz Carlos Lobato Lobo de Medeiros 4 Engenheiro Eletrdnico formado 
pelo IT A em 1968. Comecou a trabalhar em processamento de dados 
em 69, nas Areas de Producao e Suporte Ticnico em equipamentos IBM 
e atual men te 6 Assessor do diretor de Recursos Humanos da Telebris 
para assuntos de processamento de dados, em Brasflia, cargo que tern 
como objetivo estimular a utilizacao de microcomputadores entre os 
empregados da diretoria. 



10 • CALCUL0 DC JUROS - LOBATO - 19/05/83 
20 CL£AR1000iDEFINTA-:iDlNVIiI90>.V2B<90> 
30 aS"PRINITft6(20l-CALCUL0 DC JUftOS'lPfiINT 
40 PRINT'ESCOLMA UNA DAS OPCOES ABAIX0* 
30 PRINTTAB<I0)"0 - ENCOinAll"! 

PRINTTAillOl 'I - PROJECAO DE UN VALOR A 
TUAL NO FUTURO': PR!NTTAB<10I "2 - VALOR PRE 

SENTE DE PAESTACOES MENSAIS" 
60 PR1NTTAB<10)"3 - PROJECAO COMPARATIVA I E 2MPRINTI 

PRINT 
70 INPUT-0UAL A SUA OPCAO-lOP: IFOP-OTMENENDELSEIFOP -3T 

HENPftlNT'OPCAO INVALIDA"<BOT07O 
BO ONOPBOSUBIOOO. 2000. 3000 
90 0N0PGOSUB1 200. 2200. 3200 
100 END 

1000 ' PROJECAO DE UN VALOR ATUAL NO FUTURO 
1010 aSl INPUT-VALOR ATUAL -'IVM 
1020 PR 1NTB23.- TAXA HENSAL U> •"! I INPUTTlil T1B-T1B/100 

B*It 
1030 PRINTB4B.-NESES •-1:1NPUTN1 
1040 INPUT-0 VALOR DO PR1IC1R0 NES E' CORRISIDO (S/N)-l 

AI* 
1090 IFAlM-S'THENVlf<0>>OlFORI«ITOH|IVll<ll«VMNTlflV 

AR-Vlil li iVl»(Oi»VI»i0i»VI»(li:iexTELSEIFA l«o-N- 

TMENI040O.S£Vlt(ll«VAiiVl»(0)-Vli(ll:F0RI-2TO1|i 

VIi(|).VA».TH:VA»-VHI! I IVIHO) «Vlt lOKVItl [I INE 

XT 
10*0 RETURN 

1200 ' LISTABCN DOS RESULTADOC OPCAO 1 
1210 PRINTTABIIOI'RESULTADOS OPCAO "lOP 
1220 FORI-ITORHPRINTFIXIVIBIIW-INEXT 
1230 PRINT-TOTAL BCRAL • 'lFlX(VlilO) 1 1 IPRINTPROOUTO • 

-Il|FAH--N-THENPRINTHl«VIill)EL9EPRINTNl (FIXIVIl 

<I)/T1B1 
1240 VP-l4.FlX(Hl/4>>«*4!PMNTtVP.-0UER 1NPRIRIR IS/N)" 

II INPUTB«I IFM--N-THENRETURN 
1250 IF»»O-S - TMENI240 
1260 SOSUBISOOlRETURN 

1499 ' ROTINA DE DUMP DA TELA 

1500 PRINTtVP»25.-|nPRESS0RA OK-i i INPUTMi ■ IFPEEKII43I2 
><>62TMENPRINTBVP«43. 'STATUS • -|PEEK< 14312) I iBOTO 
1900 



CAlculo de Juros 



1903 LPRINTCHR«(i0>lO*«U0>l 

1510 «l«60!».2-0 

1520 F0RI-0T015"PB-VARPTR(B»HPA— (<PB>32767)»(PB-6333* 

) I - < <PB< 32768) «PB) : POX EPA. 64 1 POXEPA. I . X2i P0KEPA*2. 

XI 
1530 IFB»OSTRINB»164.32)TMENLPRINTW 
1540 »2-«2»64!lFX2.256TMENX2«0IXI«l-l 
1560 NEXTIRETURN 

2000 ' VALOR PRESENTE DE PRESTACOES MENSAIS 
2010 as: INPUT-PRESTACAO RENSAL "-iPnt 
2020 PR INTB2B.- TAXA NENSAL (1) •" 1 1 INPUTT2BIT2B-T2B/I00 

■•!• 
2030 PRINTB52.-NESES •"MINPUTN2 
2040 INPUT-0 VALOR DO PR1NEIR0 NES E - CORRIBIM (S/N)": 

A3* 
2030 IFA2»«-S-TMENV2t(0)-0:F0RI-IT0H2iV2t(l)«PN»/T26iPn 

•-V24 1 I ) : V26 (0 . ■V2t (0) •V2B 1 1 1 1 NEXTELSE I FA 24-. - "N" T 

MtN2040ELSEV2t(l)"PN»IV2BIO)"V2BllllFORl-2TOH2lV2 

BI|)*PM/T2tlPm*V2«(l>IV2BI0>*V2B(0)>V2»(l>lNCXr 
2060 RETURN 

2200 ' L1STABEN DOS RESULTADOS OPCAO 2 
2210 PRINTTABI 10) -RESULTADOS OPCAO 'lOP 
2220 F0RI-IT0N2lPRlNTFIX<V2i(ll I.INEXT 
2230 PRINT-TOTAL BERAL ■ -|FIX(V2»<0) 1 1 1 PR I NT PRODUTO ■ 

' : ■ I FA2*«*N- THENPR INTH2*V2B 1 1 ) ELBEPR INTH2 *F I X ( V2B 

IIXT2S) 
2240 VP-(4»FIX(N2/4))«64lPRINTBW.-0UER INPRINIR (S/N) - 

1 1 INPUTB6I 1FB4--N-THENRETURN 
2290 1FB4O-8-TMEN2240 
2260 SOSUBISOOlRETURN 
3000 ' PROJECAO COMPARATIVA 
3010 GOSUBI000!Q0SUBI200iB0SU»2OO0>eoSUB220O 
3020 RETURN 

3200 • LISTABCN DOS RESULTADOS OPCAO 3 
3309 80SUB4O00 

3210 aSi PRINTTABI 101 -RESULTADOS OPCAO "lOP 
3220 PRINT-NES VALOR ATUAL PRESTACAO DIFERENCA DIF.PRE 



SENTE DIF.ACurULAOA- 
3230 :FAl»-"N-T)«NCl»"Vli(l)ILl'411ELSECH-0lLI»Nl»l 
3240 IFA2»-"N-THENC2fV2B<l)iL2*t2ELSEC2fOiL2-H2.1 
3250 IFL1>L2THENH>LIE1.SEN3<2 
3260 C3t-CH-C2tiC4»«C3»iC3»-C44iNH^) 
3270 6OSUB3300U-0!LPRINTCHR«<10>ICHR«(l0)i 
3290 F0RNN-1T0N3 
3290 lFAlf-N-ANWW..niTHENCli-OELSElFAI*--N-THENCI»-V 

UlNN.DELSEIFWI^HlTMENCIfOELSEClfVlilNH) 
3300 IFA2»--N-ANDnN»>ri2THENC24-0ELSEIFA2».-N-THENC2»-V 

24( 1 )B.SEIFNHW2THENC2fOELSEC2»-V2il 1 ) *T3I 
3310 C3»»Cli-C2tlC4t»C34/TX»CHNlC3»<5i-C4» 
3320 B09UB3S00! IFm-J->13THEN60SUBISI0iaSi J«J»I3 
3330 NEXTiBOSUBlSIOiRETURN 

3900 ' RELATORIO DAS DIFERENCAS COHPARADAS 
3510 M-STR6INN)! IFLENIBtH 3THENBM* "'B* 

3919 IFCIt^OAN0C2t«0THENRETUJW 

3920 PRINTB«iTAB<6)FIXIClt)iTAB(17)FIXIC2B)iTAB(27)FIX 
IC3B)iTAB(39)FlX(C4l)iTAB(92)FIXIC3B) 

3330 RETURN 

4000 US: INPUT-OUAL A TAXA PARA CALCULO DO VALOR PRESE 

NTE DA DIFERENCA -ITXil IFTXt-OTMENTXfTl»ELSETX» 

•TX4/10O4-14 
4010 INPUT-DESEJA HODIFICAR VALORES CALCULADOS IS/N) "I 

A4l IFA»»-N-TMENRETURNELSEIFA*O"S-TMEN40l0 
4020 PRINT-OESEJA NUDARTIPRINTTAB(IO)-0 - NADA-lPRINT 

TAJIIOl-I - PROJECAO DC UN VALOR ATUAL-IPRINT 
4030 INPUT-DE NUNERO DA OPCAO DESEJADA-i I: IFI-OTHENR 

ETURNELSE IF I<> 1 TMEN4030 
4040 aSl PRINT" INFORNE NOVO VALOR OU -I PARA NANTER 

VALOR ATUAL OU -2 PARA ENCERRAR A HO0IFICACA0" 
4090 CLSlI-0 

4060 I-I»IIPRINT-N£S-HT VALOR ATUAL «-|F IXIV16I I ) ) . 
4070 INPUTC1BUFCIB— 2THEN4I00ELSEIFCI4— ITMEN4090 
4080 VltllKll 
4090 IFKMITNEN4060 

4100 Clt-0lF0RI-lT0m:C14-CI»«vl4(I):NEKT 
4110 IFCieVIBIOITHENRETURM 

4120 aSlPRINT-A SOMA DA6 PARCELAS FOI ALTERADA'IPRINT 
4130 PRINT-VALOR ANTERIOR ■-■ VI1I0) . 'VALOR ATUAL •'iCK 
4140 INPUT'ESTA' TUX OK IS/N) -|Atl IFAt-'S'THENRETURNE 

LSE IFA»<> -N- TMEN4 I 4OELSE4O90 
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uas marcas brasileiras 
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\ partir de hojje e stare i em sua memdrta todos os 
lias, no trabalho, em casa, no hirer. Agora somas 

. en e line. Son flcxiicl e se VOCi desejar, 
node me utiiizar com todos os K Bytes de potencia. 
}uando estivermos juntos, naoficard somente uma 
m lembranca, mas sim, muitos bytes de memdria. 

pode me cncontrar em todas as moda\\de A 
.pies on ilnplii face, # ou 5 1/4 
i ■omputiiel com Uk/os OS fipos <h Prin \ 
mintui i -criiticacao c varan tida de zero erros. 
\gora vore pode me adquirir cm aualquer ponta 
' Br a si I, at raves da Rule Navioiuil de 
Representantes e Revendedore\ 




dm. e Yendas: Run Jotd Cockraue. 775 Ipiran^a - SP l'\l< X «>lh 91 



dm. e V aulas: Run Lord C orkrauv. tn Ipnan^a - >/' r \n \ nuu y/ 
dial RJ Run Scnador Chin fas 75 - 22°. andar Solo 2202 I, Is.: (02 h 220.4 to 
dial Hil Run Selenjo ?f*4 \uin 2H2 - llclo HorizoMeMU lei. «)M) JJ4.47M 





Pergunta - Peco informacoes sobre 
como ler um programs em linguagem 
de maquina para o CP-500 sem usar a 
instrucao SYSTEM, e tambe'm como 
grava-lo. (Carlos Augusto Biglia, BA) 
MICRO SISTEMAS - CP-500 nao 
permite que programas em linguagem 
de maquina sejam lidos sem o coman- 
do SYSTEM. Para a gravacao em lin- 
guagem de maquina voce pode usar o 
comando DUMP. 

Pergunta — Quantos caracteres (letras, 
numero ou qualquer sinal gra'fico) po- 
de confer 1 Kbyte? Em uma programa- 
cao BASIC (ou outra linguagem) exis- 
te alguma coisa que "consuma" memd- 
ria alem das possfveis "respostas" do 
computador (respostas e dados, natu- 
ral men te)? (Jose" Luciano Albuquer- 
que, PE) 

MICRO SISTEMAS - 1 Kbyte pode 
conter at6 1024 caracteres. Com rela- 
cao ao "consumo" de memoria, o pro- 
prio programa (seu codigo interpreta- 
vel) ocupa espaco. Alem do programa, 
registros lidos ou a serem gravados em 
perifericos, dados diversos necessarios 
ao sistema operacional, e a parte basica 
do sistema operacional tambem ocu- 
pam espaco de memoria. 

Pergunta - Existe microcomputador 
do tamanho da palavra de 16 e 32 
bits? Quais? E na avaliacao de um micro 
o que se deve considerar mais: o tama- 
nho da memdria principal ou o tama- 
nho da palavra? (Jose" Oswaldo Mar- 
ques, MG) 

MICRO SISTEMAS - No Brasil s6 
existem, por enquanto, micros de 16 
bits, como o da empresa Sisco e o da 
Ego. Mas nos Estados Unidos existem 
micros de 16 e de 32 bits, sendo que 
este de 32 bits mantem-se fiel a estru- 
tura interna de um microcomputador, 
e aqui no Brasil os equipamentos com 
32 bits sao considerados, por sua estru- 
tura e f Uosofia, como minicomputado- 
res. 

Deve-se considerar o tamanho da, 
memdria, pois a palavra e apenas um 
m^todo de se dividir a mem6ria. 
Pergunta — Gostaria de saber se os pro- 
gramas oferecidos pela Microdigital 
podem ser rodados no CP-200. Em ca- 
so afirmativo, os jogos existentes pres- 
supoem que eu tenha joystick e gera- 
dor de som? 



O CP-200 vem com sinal sonoro de 
acionamento de tec/as, podendo ser 
acionado por programa. Per gun to: 
assim sendo, o gerador de som 4 des- 
necessa'rio ou o efeito sonoro para jo- 
gos nao e" satisfatdrio? Precisando do 
gerador, ha" possibilidade de acopla'-lo 
ao micro? £ possfvel utilizar dois joys- 
ticks no microcomputador? (Victor 
Hugo A. Salomao, SP) 
MICRO SISTEMAS - Os programas 
da Microsoft, ou outra empresa qual- 
quer, oferecidos para o TK82-C po- 
dem rodar no CP-200 sem problema 
nenhum. Tanto o joystick como o ge- 
rador de som sao opcionais, eles facili- 
tam e incrementam os jogos de movi- 
mento mas nao sao imprescindi'veis. 

bip do CP-200 nao pode ser utili- 
zado como gerador de som, ele serve 
apenas para indicar o acionamento de 
uma tecla. Com relacao ao joystick, e 
possi'vel utilizar dois joysticks no com- 
putador. Se o micro nao possuir duas 
tomadas, sera" necessa>io, entao, uma 
pequena implementacao na base do 
teclado. 

Pergunta — Tenho tres duvidas com re- 
lacao ao Curso de Programacao Sinte"ti- 
ca publicado em MS 12 a 15: 1? ) Co- 
mo e" feita a "escovacao de bits?" 2? ) 
Como 4 feita a programacao bit a bit? 
3? ) que 4 feito no programa sinte'ti- 
co em MS nQ 15, pagina 72, do passo 
06 ao 13, principalmente os passos 08 
a 11? (Alexandre Nadalutti, SP) 
MICRO SISTEMAS - Escovacao de 
bits 6 uma gi'ria usada pelos fanaticos 
da programacao, pelos hobbystas. Prin- 
cipalmente quando essa programacao 
nao traz resultados pr^ticos. O sinoni- 
mo mais proximo de "escovar bits" se- 
ria "entortar bits", tarefa igualmente 
a>dua, senao impossfvel. 

Programacao bit a bit 6 a manipula- 
cao dos bits, at raves do uso das flags, a 
f im de formar os bytes integrantes da 
cadeia de instrucoes. 

Os passos 6 a 13 preparam o regis- 
trador c para leitura. Essa leitura e 
feita transferindo-se o conteudo de c 
para d (cujo conteudo tambem 6 con- 
servado) e lendo-o com o uso das flags 
do sistema. Os passos 8 e 1 1 colocam 
bytes auxiliares no registrador Alpha 
em modo APPOND, obrigando que o 
conteudo anterior se desloque para a 
esquerda um numero determinado de 
bytes (3 e 4 respectivamente). 



Pergunta — Tenho uma dudiva quanto 
a adaptacao de programas em BASIC 
Level I (TK82-C) para BASIC Level II 
(TRS-80). Como transformar a instru- 
cao PRINT ATX, Y;em PRINT Z, ...? 
Eu possuo um Dismac D-8001. (Alfre- 
do Augusto T. Gallinucci, SP) 

MICRO SISTEMAS - A instrucao 
PRINT AT X, Y do TK82-C pode ser 
substituida por: PRINT @ X+(Y+64) 
no D-8000 ou nos similares ao TRS-80. 

Pergunta — Minha pergunta 6 apenas 
para elucidar-me com relacao a instru- 
cao PAUSE do TK85. Tanto no ma- 
nual do TK85, quanto em um art i go 
publicado pela MICRO SISTEMAS nQ 
21, pagina 60, 6 afirmado que, de acor- 
do com o padrao M, a duracao da exi- 
bicao de um quadro e" de 1/60 segun- 
dos, ou seja, 60 quadros por segundo. 

Mas, se a frequencia de varredura 
horizontal e" de 1575 Hz (1575 linhas 
por segundo), e se temos um total de 
525 linhas horizontals (dois campos), 
que equivale a um quadro completo, 
conclui-se que temos 30 quadros por 
segundo (1575: 525) e 60 campos por 
segundo (30X2). 

Entao, eu pergunto: como se expli- 
ca a instrucao PAUSE do manual do 
TK85 (capitulos 19-1)? (Celso Rober- 
to Moraes, SP) 

MICRO SISTEMAS - A instrucao 
PAUSE nao depende da quantidade de 
quadros enviados a TV por segundo, e 
sim da quantidade total de quadros 
enviados pela rotina do display. Assim, 
PAUSE N signifies que o processamen- 
to serS interrompido e apos N quadros 
ele ser3 reiniciado (N quadros ou ate 
que uma tecla seja pressionada). 

Tudo isso e comandado pela rotina 
do display, e a taxa de quadros por se- 
gundos apenas nos informa quanto 
tempo durara uma PAUSE N (descon- 
tando-se al' o tempo de processamento 
das rotinas envolvidas). 



Pergunta — Posso usar a impressora 
P-500 da Proldgica com o D-8000, da 
Dismac, compatfvel com o TRS-80 
ni'vel II. Como devo fazer para conec- 
ta'-los? O que devo fazer para ampliara 
memdria do D-8000? (Valdemar Hen- 
nings, SC) 

MICRO SISTEMAS - Para conectar a 
impressora P-500 ao D-8000 e preciso 
ter a interface de impressora do D-8001 . 
A memoria do D-8000 pode ser, 
eletronicamente, ampliada. Mas a Dis- 
mac normal mente nao vende a expan- 
sao. 
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(T1.5. Servicos 




Computadores e 
Sistemas Ltda. 



Revendedor BRASCOM 
Microcomputador BR1000M: 
1a6 terminals MULTIUSUARIO 
De 2,4 a 384 Mb em- disco 
linpressoras de 100 CpS a 600 Lpm. 
SOFTWARE: Contabilidade, 
Administragao de Pessoal, 
VENDA E RESERVA DE INGRESSOS 
Contas a receber/Pagar, 
OPEN MARKET, 
Faturamento e outros. 



Rua das Marrecas. 25S/1001 

Tel. 262-0697 -hgueHS 

Rio de Janeiro - RJ 
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MICROIDEIA 



SOFTWME P/TK 82 C • TK-tt - Cf M 

tMlfT PW90/ORTN 

- CoMroia da aatoqua 

- ConlM ■ pagailracaba* 

- Flu«o da CaUa 

- Maladtrata 

- Cadaatro d* dtantaa 

- Piucaaiartnr da laxtoa 

- Control* bancario 

- ContaMMada domaallea 

- Aoanda WHH 

- FTtoiaca 

- Ocamaolo Oomattlco 

- Htetograma Oaral 

- Control* da conlralot 

- Raaanra da coo tollai 

JOGOS A 1 ORTN 

- Mian Blaalar Bonibafdak) - Caaalno ■ OoAo - All 
B«ba/Coamlc Radar Spaca kinadanj 

SOFTWARE P'CP 500 
Em Dtaco 

- Control* da aalooua • Procaaa. da Tarto 

- Conlaa a Paoar/Racaoat Cadaatro da Cllanlaa 



ATENDEMOS P/REEMBOLSO 
POSTAL OU AEREO 



REPRESENTANTE: MICRO HOUSE 
Com Rapcanl. Llda. R. ""J^*""!*. 547 . 
a/307lpanama Cap 22.410 MWMM 
atra**t da MICROIDEIA A*. Marachal Camara. 
ieO/1426-CaalaloRlo Cap. 20.020 Raeadoa 
palo BIP J89 Canlral 246-4180 



Horarios: diurno, noturno e 
sabados 

InscricSes abertas 
Revendedor e assistencia tecnica 
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■■ rmcrocomputadores 



COMPUTADOR 



"CONTABILIDADE 
E DIVERSOS" 

1 VOL. Programas em lin- 
guagem "BASIC". Aplica- 
odes completamente resolvi- 
das. TK-82 C, TK-85. NE 
Z8000, SINCLAIR Z X 81. 
Quantidades - TEL.: 23*4264 
Varejo — Av.' Afranio Melo 
Franco. 170 Lj. B. 

LEBLON 

BANCA JORNAL — Av. 
Ataulfo Paiva Esq. R. Carlos 
Goes — Leblon 
PREgO Cr$ 3.900.00 




SYS DEZ 

comercio e manutencao de 
computadores ltda. 
Rua das Rosas, 732 - Miranddpolis 
CEP 04048 ■ Tel. 579-8867 



AUMENTE A 

PRODUTIVIDADE 

DE SUA EMPRESA 



PRH 
CONSULTORES 

Para o desenvolvimento da 
sua empresa, estamos pron- 
tos a servi-lo. 

Assessoria de Processa- 
mento de Dados, Desenvol- 
vimento de Programas e 
Treinamento de Pessoal. 

O futuro e hoje e nos esta- 
mos presente. 



PRH Consultores 

Rua Mexico, 70 - Grupos 810 11 

Centro - RJ. Tel.: (021) 220-3038 




Assistencia Eletronica Ltda. 
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Rua da Lapa. 107-1° and. 
Tels.: 222-7137 e 222-2278 
Rio-RJ. 



BB BITS E GVTB 

Computadores 




Est. da Gavea, 642 Lj B Sao 
Conrado - RJ - Tel.: 322-1960 



No Recite, vis** 

T E L E V i D E (') 

Lo|3o de informatica mats des- 

complicadodopais' 

Micros, penfencos. supnmentos. 

Software, Cursos, Livros e Revistas 

Componentes eletrdnicos. pecase 

Som. 



PREQOS ESPECIAIS 
FINANCIAMENTO PR0PRI0 



Compre pessoaimente ou peio 
Reembolso: 

TELEViDEO LTDA. 

R. Marques de Herval. 157 

Tel.: (081) 224-8932, 

RECIFE, PE. 



(') Sr. Industrial: distribuimos s/ 
produto nas melhores condi- 
coes: contatos em S. Paulo (011) 
2235480. 




MOQiBWE 

SISTCHAS C C0UIPAMENT01 
C0HPUTACI0M4K LTD* 

|— HARDWARE 

Perifericos para 
Linha Sinclair 
TK-82C, TK-85 
NEZ8000 e CP-200 



—SOFTWARE 

Jogos e Aplicativos 
Desenvolvimento de 
Sistemas Prbpnos 



CURSOS 

Linguagem Basic Com 
aulas praticas 
Apostilas gratis 
Desenvolvimento de 
programas 

I— BIREAUX DE 

SERVIQOS 

• Administracfio 

• Contabilidade 

• Estoque 

• Folha de pagamento 

• Etc. 

I— MERCADO DE 

MICROS USADOS^ 

Agenciamento 
Compra e Venda 

Rua Buenos Aires, 41 

3° andar — Centro 

CEP 20.070 

Rio de Janeiro 

Tel. 263-4024 




CURSO BASIC 



Turmascom lOalunos 
Aulas praticas e teoricas 

Horarios: 

manha8:30 hs as 10:30 hs 
tardel 4:00 hs as 1 6:00 hs 
noite 20:00 hs as 22:00 hs 



\1\IKIC I 1 AS \BER1 V 



Rua Vise, de Piraja. 540 lj 106 
22.410 1 panema Rio RJ 
Tel. 259-1516 




SEU 

MICRO TEM ASSISTlNCIA 
TECNICA DE GRANDE PORTE. 

Hd mais de 1 2 anos a MS presta atendi mento a u ma sene de empresas , 
no conserto e manutencao de computadores dos mais diversos portes 
e marcas. E toda essa bagagem tecnica esta tambem a sua disposicSo, 
oarantindo o desem penho ininternjpto do seu micro. 

• Socorro urgente teJeWnico • chamou-chegou! 

• Check-ups preventives 

• Reparos 

• Substituigao de pecas com garantia 

• Substituicao do micro ou unidades perifericas 

• Contratos de assistenaa tecnica a empresas e particulares. 
Na MS a vida de sua maquina esta garantida. 

MS - Assistdncia T6cnica a 
Microcomputadores 

Rua Astoifo Araujo, 521 - Tel.: 549-9022 

CEP 04008 -S.Paulo -Capital 

Representante no Brasil da: MDS - Mohawk Data Sciences/MSI - Data Corporation 
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ICRO PROCESS 

COMPUTADORES LTDA. 



• Microcomputadores: 

Microdigital, Prologica e Similares Apple 

• Micro Sistemas AIKO/CCE 

• Aulas de Basic 

• Calculadoras Sanio/Casio 

• Fitas e Diskettes 

• Monitores, Impressoras, Disk-drives, etc.. 

• Programas (fita/diskette) para todos os 
computadores contabilidade-aplicativos- 
jogos, etc. 

Personalizacao de programas para firmas e 
prof, liberais 

• Jogo Odissey/Dactari 

• Manutencao e Transformap§o de Televisores 

• Revistas e Publicacoes Tecnicas 

• Amplo Financiamento 

• Despachamos por nossa conta via Varig. 

TEL.: 64-0468 

Alameda Lorena, n° 1310 - CEP 01424 

Sao Paulo 

••• ESTACION AMENTO PARA CLIENTES ••* 




TREMBLAY, J. P. 

§ BUNT, R. B., 

CIENCIA DOS 

COMPUTADORES, 

U ma Abordagam 

Algorftmica, 

Editors McGraw-Hill, 

Crt 3.700,00 fdez/83) 



CkEnCtA DDS 

CnmPUTflODRES 

Uma Abordagem Algoritmica 
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JEAN-PAUL TREMBLAY 
RICHARD B. BUNT 



I." I McCrawHHI 



Este 6 um livro importante para os iniciantes em pro- 
gramacSo e anSlise, que pretendam aperfeicoar seus co- 
nhecimentos sobre algoritmos. O livro apresenta aplica- 
p5es e exerci'cios de forma a cobrir uma larga faixa de in- 
teresses, incluindo a computacSo cientffica, o processa- 
mento comercial, aplicacoes em Engenharia, os proble- 
mas sociais e os topicos de interesse geral. 

Todos os capftulos, exceto o primeiro, contfim exem- 
plos cuidadosamente trabalhados, nos quais o material 
apresentado e* aplicado d solucSo de problemas pra'ticos. 
O enfoque estd na resoluqao rigorosa e sistema'tica de 
questSes atrave*s da utilizacio de algoritmos, tanto os nu- 
me'ricos quanto os nao nume'ricos. Considera'vel atencBo 
6 dada is estruturas de dados, apropriados a cada aplica- 
cSo particular. 

As construcdes sinta'ticas da linguagem algorftmica, 
ao inve*s de serem apresentadas todas de uma $6 vez, slo 
dadas ao longo do livro, para atenderem as novas exigdn- 
cias que forem surgindo. 

O primeiro capftulo i uma breve visSo hist6rica do 
desenvolvimento dos computadores e de sua programa- 
c8o. 

O capftulo dois pode ser visto como a verdadeira in- 
troducao do livro. Apresenta diversos conceitos funda- 
mentals de computaclo e ainda as primeiras construcdes 
sinta'ticas da linguagem algorftmica. 

A nocSo de fluxo de contro/e 6 introduzida no capf- 
tulo trds, com duas estruturas fundamentals de controle :* 
a seleclo de ac&es arternativas e o laco. 

No capftulo quatro 6 abordado o conceito de conjun- 
to, abrangendo os unidimensionais e os demais. 

O capftulo seis trata de funcoes e procedimentos. Os 
tdpicos discutidos incluem a correspondencia entre argu- 
mentos e parfimetros, a forma como funcSes e procedi- 
mentos s8o chamados e, ainda, os valores retornados. 

O estilo na programacao 6 o tdpico do capftulo sete, 
que inclui consideracdes sobre a qualidade dos progra- 
mas, a programacSo defensiva, o gerenciamento da com- 
plex idade, a preparacao de programas legfveis, a progra- 
macSo por abstracSo/refinamento e a programacSo co- 
mo uma atividade humana. 

O oitavo capftulo oferece uma introducSo ao estudo 
de estruturas lineares de dados. SSo discutidas estrutu- 
ras simples, como listas lineares, pilhas e filas e tambe'm 
operacSes com estas estruturas. 
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Seguranca 

absoluta para 

adquirir um micro: 

Imares . 

AMPLOS FINANCIAMENTOS 




A mais complete linha de 
microcomputadores voce encontra na 
Imares. E sempre com a mais absolute 
seguranca. A Imares e uma loja diferente, 
com uma f ilosof ia de servicos fora de serie: 
coloca equipamentos, softwares e pessoal 
experiente a disposicao de seus clientes, 
dando total orientegao de com p ra do 
equipamento adequado as suas 
necessidades atuais e f uturas. 
Cursos de linguagens e aplicativos, tais 
como: Basic, Logo, Assembler, Visicalc 
entre outros. Voce vai ter sempre uma 
convivenciatranquila com oseu micro. 
Uma perfeita assistencia tecnica, estara ao 
seu lado com um simples telefonema. 
Fique certo: a Imares e a solucao def initiva 
para voce comprar um micro. 

A I MA RES PODE IR ATE VOCE 

Solicite sem compromisso a visita de um 
representante Imares no esch t6rio ou em 
suacasa. * 

A IMARES ESPERA POR VOCE 



NosJardins: 
das9as19h 
(sabadosateas13h) 
R. Dr. Renato Paes 
de Barros, 34 
tone: 881-0200 



imorc/ r 

microcomputadore/ 



EmMoema: 
das8as22h 
(sabadosateas18h) 
Av. dos Imares, 457 
tones: 61-4049/0946 
531-3012 
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Descubra os segredos do comando LAST do CP/M, saiba como utiliza-lo 
e economize tempo e... disquetes. 



LAST: comando zero do CP/M 



Joao Henrique Franco 



Voce acabou de digitar um enorme programa em BA- 
SIC e agora ira salva-lo. Antes, porem, voce quer tro- 
car o disquete. Um pouco distrai'do, voce se esquece 

de avisar ao CP/M, atrave"s do comando RESET, que foi trocado 
o disco. Entao, quando voce digita o comando SAVE, para sua 
surpresa, o CP/M emite a seguinte mensagem: 

BDOS error on B: R/0 

Pois e\ as lnformacOes do diret6no que estao na memona 
ainda s5o as do disquete anterior, e mais, voce na"o podera es- 
crever neste disquete e devera voltar ao CP/M. Parece que suas 
longas horas de trabalho foram desperdisadas... Mas nem tudo 
esta perdido. Relaxe, tenha calma e chame o programa LAST. 
Ao digitar: 

A)LAST(cr) 



A)STAT XPTO.BAS $R/W(cr) 

XPTO.BAS set to R/f 

A)REN MHOC.BAS=XPTO.BAS(cr) 

A)LAST HHDC.BAS $R/0(cr) 

MHDC.BAS set to R/0 

A) 

O mesmo acontece quando voce tern que editar, sucessiva- 
mente, varios arquivos, utilizando, por exemplo, o editor pa- 
drao do CP/M, o ED. Fica evidente, mais uma vez, a utibdade 
do LAST: 

A)ED PDS.FOR(cr) 



o CP/M, como que por encanto, ativara novamente o BASIC, 
recuperando todo o trabalho perdido. Se na"o acreditar, tente 
LISTar seu programa. Pronto, agora basta salva-lo. 

Imagine que, desta vez, voce quer alterar o nome de um ar- 
quivo R/O (read-only) de XPTO.BAS para MMDC.BAS, con- 
servando am da a conditio R/O. £ claro que voce vai usar o 
STAT, outro utilitdrio do CP/M. Mas apenas uma vez! Nova- 
mente entra em acSo o LAST e pronto, rrussa'o cumpnda antes 
do prazo. Veja : 



A)LAST PNDB.FOR(cr) 



A)LAST PTB.FOR(cr) 



A) 




SEU MICRO E' COflPATIVEL COM APPLE II PLUS' 
* FOLHA de: PABAMENTO * 

AGILIZA A 6ESTA0 DE PESSOAL DA SUA EMPRESA, CADASTRO PARA ATE 200 FUMCI0NARI0S, 44 C0DI- 
SOS DE VENCIHENTOS E DESC0NT0S, HOLLERITH INDIVIDUAL E A EHISSAO DE 6 RELATORIOS.'SUPORTE 
PARA USUARIO FINAL REFERENTE ALTERACOES DA LE6ISLACA0 TRABALHISTA BRASILEIRA.' 
SOLICITE INFORMACOES: POTENCIAL SOFTWARE - CAIXA POSTAL 977 - 13.100 - CAMPINAS - SP FONE: (0192) 31-5340 



POTENCIAL SOFTWARE 
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Enta*o, nao podendo mais conter sua cunosidade, voce vai 
querer examinar mais de perto esse incrivel utilitano LAST, 
querendo saber, por exemplo, seu tamanho. Para isso, vamos 
usar novamente o STAT: 

A)STAT LAST.COM(cr) 

Recs Bytes Ex Ace d: f ilenaae. typ 

OK 1 R/f ArLAST.COH 

Bytes regaining on A: 10K 

A) 

Incrivel, o programa LAST nao contem nada\ Como € pos- 
si'vel que ele faca algo de util? Para descobnr o segredo e" pre- 
ciso recapitular o processo de ativacffo de programas pelo 
CP/M. 

CONHECENDOO LAST 

Quando o CP/M recebe um comando do tipo Residente 
(DIR, ERA, REN, TYPE, SAVE e USER) o programa corres 
pondente ja esta* em memona, mais preasamente no CCP 
(Console Command Processor), que i a interface entre o CP/M 
e o usuino, e neste caso o CP/M preasa apenas ativa-lo. 

Por outro lado, caso o comando seja do tipo Transiente, o 
CP/M ira procurer no disquete indicado (ou no disquete de- 
fault) um arquivo de mesmo nome que o comando fomecido 
e de extensao COM. Encontrando-o, o CP/M ira" carrega-lo na 
Area Transiente de Mem6na (TPA) e em seguida ativd-lo, 
atraves de uma mstrucao CALL, para o endereco 100 hexade- 
cimal (endereco inicial da TPA). 

Agora e" fa"ol en tender como i que o nosso LAST funciona. 
Quando o CP/M, apos receber o comando LAST, encontra o 
arquivo LAST.COM no disquete, venfica tambem no seu 
FCB (File Control Block - descntor do arquivo) que o nume- 
ro de setores (records) que devem ser carregados em memona 
e ZERO. Entao, nada mais a fazer, o CP/M acaba ativando, 
sem saber, o programa Transiente ativado antenormente, que 
estava na TPA, sem modifica-lo. 

Bern, antes que voce pergunte, ai vai a receita para se cnar 
o LAST, que e mais fdal do que parece: 

A)SAVE LAST.COH(cr) 
A) 

Para finalizar, tres dicas importantes. A pnmeira delas e 
que o LAST nao reativa os comandos Resdentes, pois estes 
slo carregados na TPA. De qualquer modo, nao e" tempo per- 
dido carregd-los, pois eles ja" estao em mem6na. A segunda, e 
que voce deve ter atencSo para com o uso do LAST em progra- 
mas que se auto-modificam, como o Depurador Padrao do 
CP/M, o DDT. Este, uma vez carregado na TPA e ativado, 
reloca-se para a drea de mem6na logo abaixo do BDOS (BASIC 
Disk Operating System), deixando a TPA livre para que outro 
programa (qual?) seja carregado. Por ultimo, 6 preciso ter cui- 
dado ao usar o LAST para reativar programas extensos, que 
geralmente fazem uso de overlays, como compiladores, por 
exemplo. 

Fica no ar, ainda, uma diivida: sera o LAST um comando 
Transiente . Residente , ou nenhum dos dois? ■ 



JoSo Henrique de A. Franco 4 Engenheiro E/etrdnico, formado pela Es- 
cola Polite'cnica da USP e cursou o CEAG da Fundacao Getulio Vargas, 
na irea de Pesquisa Operational e Informa'tica. Atualmente e~ Engenhei- 
ro do Projeto Trdpico-RC no CPqD da Telebnis. 
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^ROCOMPyTADORE 



DUAS GRANDJBS 



— COMPLICITY 



"^p«ci.y.o».e"^ *" niot5,in0 

programa. 



Rua Tome de Souza, 882 - Savassi. Fone: 226 6336. BH - MG. 




Aplicativos totalmente em portugues 
para microcomputadores compativeis 
com APPLE® : 

• MICROCALCULO - orpamentos, proje<p6es 

• EDITEX - processador de textos 

• MICRODATA - banco de dados integrado 

• GRAFI SERIE - graficos 

• MLOGO - linguagem 

• COPIARTE - sistema de c6pias 

E muitos outros. 

Garantia e assistencia total. 

MICROARTE SOFTWARE S/C L TDA. 

Rua Coronel Mello de Oliveira, 763 

Tel.: (01 1) 263-6285 






A popularizacao da Informatica e uma reflexao sobre o presente e o futuro 
do setor sao os principal's temas em debate no Informa'tica 83. 



INFORM ATICA 83: 
o computador a servigo 

da sociedade 



A1 Informatica no BrasU: estagio 
atual, efeitos da crise e rumos 
futuros, alem da crescente po- 
pularizacao do computador na socieda- 
de brasileira sa"o os principals temas do 
XVI Congresso Nacional de Informati- 
ca/III Feira Intemacional de Informa'ti- 
ca. evento reunird, de 17 a 23 de ou- 
tubro, no Parque Anhembi, em S5o Pau- 
lo, personalidades politicas do BrasU e 
do exterior, empresdrios, te'cnicos, pro- 
fissionais liberais, estudantes e leigos, 
em torno de mais de 270 temas ligados 
ao assunto. 

Este ano, ale'm das sessQes plendrias, 
especiais, tdcnicas, de estudantes, expo- 
sicOes e paine'is, o XVI CNI realiza tam- 
be'm sete mini-cursos de computacao, 
destinados a professionals liberais de di- 
versas dreas que desejem conhecer esta 
tecnologia e incorpord-la ao seu dia-a- 
dia. Um "Curso Popular de Microcom- 
putadores" para 3 mil e 500 participan- 
tes ird divulgar os segredos da micro- 
informdtica e sua aplicacao no lar, nas 
escolas, nas pequenas e me'dias empre- 
sas, nas profissOes liberais etc. 

SESSOES PLEN ARIAS 

A sessSo solene de abertura do Con- 
gresso contard com a presence do Mi- 
nistro Danflo Venturini e no encerra- 
mento estarao presentes o Presidente 



Figueiredo e o Governador de Sa*o Pau- 
lo, Franco Montoro. 

As sessdes plena nas terdo como te- 
nia: "Poli'tica de Informdtica", "Infor- 
ma'tica na Ame'rica Latina", "Informa'ti- 
ca e o Emprego", "Informa'tica e o Sa- 
telite". As sessoes serSo sempre das 
1 1 :00 h as 1 2:45 h, abertas a todos os 
participantes do Congresso. 

As sessoes especiais sera"o compostas 
de conferencias sobre "0 Impacto dos 
Microcomputadores", "Sociedade Infor- 
matizada e Escrit6rio do Futuro", e 
por pain^is onde serfo discutidos diver- 
sos assuntos como "A Informa'tica e o 
Crime", "Impacto da Automacao na So- 
ciedade", "0 Desenvolvimento da Tec- 
nologia", entre outros. 

Ainda dentro dessas sessQes sera"o rea- 
lizados eventos especiais, tais como o II 
Encontro Latino Americano de Usua- 
rios de Informa'tica (de 1 7 a 19); o II Se- 
mindrio de Biblioteconomia e Informa'- 
tica (de 17 a 21, no Centro de Conven- 
ers Reboucas); o Semindrio sobre In- 
forma'tica e Energia, com a presenca do 
Prof. Jose' Goldemberg, presidente da 
CESP (dia 18); Semindrio sobre Tele- 
mdtica (dias 20 e 21); e Semina'rio so- 
bre Auditoria de Sistemas (de 17 a 21, 
na Prodesp). 

Nas sessoes t^cnicas serdo apresenta- 
dos trabalhos sobre temas atuais relacio- 
nados a Informa'tica. Dos 220 trabalhos 



inscritos, dois sera"o premiados com uma 
viagem ao NCC ou ao Sicob. As pales- 
tras especiais para estudantes abordarSo 
aspectos te'cnicos e aplicativos da Infor- 
matica a servico da sociedade. 

ATRACOES ESPECIAIS 

Num mini-circo montado no Anhem- 
bi, o pessoal de sete a 16 anos poderd 
conhecer os miste'rios do mundo da In- 
forma'tica. Serao oito sessOes com a uti- 
liza?ao dos micros AP II, da Unitron, na 
linguagem LOGO e na"o faltarSo, nem 
mesmo, os palhacos de um circo de ver- 
dade. As sessoes sera"o acompanhadas 
por psic61ogos, educadores e assistentes 
sociais. A noite, o circo serd ocupado 
por artistas que dara"o shows de miisica 
com sons obtidos atrave's do computa- 
dor. 

A HI Feira Intemacional de Informa'- 
tica, paralela ao Congresso, ale'm de dar 
uma vis3o do atual estagio da industria 
de Informatica, tambe'm serd uma atra- 
c3o a parte. Este ano, o evento surpre- 
endeu seus organizadores com um total 
de 20 mil m 2 totalmente vendidos. Mais 
2 mil m 2 de Feira estao reservados para 
as Universidades e Entidades de Pesqui- 
sa. Neste local tambe'm ocorrerd a I Mos- 
tra de Artes Computacionais, onde ar- 
tistas brasileiros mostrardo a sua criati- 
vidade com o uso do computador. M 
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A geracao def initiva 6 sempre a prdxima 




DANCING DEMON 



VocG so descobre o quanto precise de urn Micro-Com- 
putador JR da Sysdata depois que o conhece de perto. 

Voce vai ter certeze de que fez urn Otimo negocio ao 
adquirf-lo assim que o colocar na sua empresa ou na sua 
casa. 

JR da Sysdata e rapido, e versatil, 6 compacto. 
APLICAC6ES: 

Contabilidade, controle de contas a pagar, controle de 
contas a receber, folha de pagamento, controle de esto- 
que, controle de clientes, relatOrio de clientes, mala direta, 
calculos de orcamentos financeiros.controle de processos 
industriais, calculos de engenharia, calculos de estatlsti- 
cas, funcoes matematicas, funcoes logicas em cadeia de 
caracteres (STRINGS), graficos, jogos animados, progra- 
mas educacionais. 
O JR PERMITE AINDA: 

acesso a grandes sistemas de computacSo, a comuni- 
cacflo entre os departamentos de Empresa, efetuar pro- 
gramas especfficos para cada Empresa. 

E, como se n8o bastasse, ele e o Micro-Computador cto 
manor preco do mercado 

Com todas as qualidades que tern, o JR da Sysdata nem 
precisava ser tfio economico. Mas e. 

Afinal, ele 6 o mais completo Micro-Computador de sua 
gerecao. 

Inclusive no preco. 

Voce pode tester estas e outras qualidades do JR em 
qualquer dos nossos revendedores. 




Rua Jorge Duprat Figuairado, 647 - CEP 04361 
mil llflll Vl,a San,a Catahna Sao Paulo SP 
cr^rCca^ao F*"* 542 "22 5314390 531-0410 
T9hM(01 1)23579 



REVENDEDORES:SAO PAULO: Capital AD Data = 864 8200 • ADP System - 227-6100 • Bucket - 881-7995 • Compushop - 212-9004/210-0187 Compote = 
852 8290/257 3952 Computerland = 258-3954/1573 - Foto Leo - 35-7131 ■ Guedes - 289-9051 - Interface - 852-5603 Lema = 210-5929 Mappin = 
258 4411 258 7311/9358 Microrei *• 881-0022 - Microshop ■ 852-5603 Miprotec - 289-4941 Rental - 543-9653 • Runners - 68-3779- Sacco ■ 814-0598- 
Servimec - 222-1511 - Sistemac - 282-6609 • Sos ■ 66-7656 Campinas Computer House - (01921 852-5855 Microtek « 101921 32-4445 - Sao Jose do Rio 
Preto Compusys - (016) 635-1 195 - Seno - (016132-0600 M09I Quacu - Guacumaq - (019) 261 -0236- Teubate Ensicom = (0122) 33-2252 PERNAMBUCO- 
Raclfa Elog.ca = (080) 241-1 162/241 -1 149 - OOlAs - Qolania Casa do Micocomputador - (062) 223-1 185 • Grupom (062) 225-8226 MATO GROSSO DO SUL- 
CampoQrande DRL - (0671 382-6487 - Video Computadores - (067) 321-4220- BRASILIA- Capital Compushow - (061) 273-21 28- Digitec - (0611 225-4534- 
RIO DE JANEIRO -Capital -Clap - (021) 288-0734/284-5649 -Computique - (021) 267-1093 -Knstian - (021) 252-9057 Micromaq = (021) 222-6088 - Petropo- 
■a-FotoOtica - (0242) 42 1393/43-6120 • PARANA- Londrina - Shop Computer = (04321 23-9674 - Umuerama • CBM Comercial - (0446) 23 2233 CurMba 
Micro System - (041) 232-3533 - PontaQroaaa-Grupo Data Memory - (0422)24-6191 PARAlBA- JoioPessoa Medusa - (083) 221 -6743- CE ARA - Fortalexa 
Siscomp - (085)244-4691 MINA8 QERAIS - Beto HorUonte Compucity - (031) 226-6336 - Kemrtron - (031) 2250644 - Pro Informatica = (031) 337-8792 • 
SANTA CATARINA - Bkimenau Projesul - (0473) 22-3848 FlorlanopoMs - Castro « (0482) 22-6933 - Infotec ■ (04821 23-4777 - RIO ORANDi DO 8UL- Novo 
Himburgo Mtcromega = (0512) 93-4721 - Porto Alagre - Advancing - (0512) 26-1 194/26-0194 -Digital =■ (0512)40-1998/24-141 1 • Microsis - (0512)22-9782- 
S.stematica - (0512)21-0732/21-0835 



Lendo este artigo, voce sab era qua is sao as caracterfsticas 
do CP/M e os requisitos de hardware necessarios a sua imp/antacao 



que eo CP/M? 



Henrique Ribeiro Filho 



OCP/M - do ingles Control Pro- 
gram for Microcomputers, e 
para nos Programa de Controle 

para Microcomputadores - foi concebi- 
do por um grupo de programadores da 
Microcomputers Applications Associates 
(MAA) como um sistema operacional de 
base ao compilador PL/M, desenvolvido 
por eles mesmos para a Intel Corpora 1 
tion (cnadora do microprocessador 
8080). Todavia, esta nao mostrou mte- 
resse, pois usanam o PL/M em compu- 
tadores de grande porte. 

Mas o grupo do MAA, acreditando 
que o CP/M simphficana o desenvolvi- 
mento de sistemas utilizando micro- 
processadores, uma.vez que grande par- 
te do tempo de projeto era perdido na 
definic3o e implementacao de um pro- 
grama para gerenciamento de disquetes, 
continuou a desenvolver o sistema ope- 
racional de forma que pudesse ser ms- 
talado em qualquer equipamento basea- 
do no 8080 ou compati'veis (Z80 e, 
depois. 8085), abrangendo, portanto, a 
grande maiona dos micros disponi'veis 
no mercado daquela e"poca (meados dos 
anos 70). 

E e* justamente esta portabilidade que 
permite ao projetista dispender menos 
tempo com a implantacao do sistema 
operacional e dedicar-se integralmente 
ao seu sistema. Esse fato, associado ao 
de ser o pnmeiro sistema operacional de 
8 bits e devido a vanas casas de software 
terem acreditado nele. desenvolvendo 



diversos programas que o utihzavam, ele 
foi rapidamente bem aceito, e hoje € di- 
fi'cil encontrar um fabncante de micro- 
computador que nao ofereca compati- 
bilidade com o CP/M. 

DESCRICAO DO CP/M 

Podemos observar. no diagrama da fi- 
gura 1 , que o CP/M e dividido em tres 
partes. Esta representacao, por razoes 
obvias. e chamada de casca de cebola. 
o que significa que cada ni'vel interage 
somente com o ni'vel lmediatamente in- 
ferior (ni'vel interno). sohcitando a exe- 
01930 de alguma functfo. Vejamos en- 
tao quais sao as tarefas executadas em 
cada um dos ni'veis. 




Figura 1 - Estrutura do CP/M 



• BIOS (BASIC Input/Output System 

- Sistema Basico de Entrada e Sai'da). 

Este modulo e responsavel pela inter- 
face do software com o hardware. £ ne- 
le que esta"o localizadas as rotinas de 
acesso aos penfe"ncos do sistema res- 
ponsaveis pela mtera^o com o hard- 
ware, possibilitando ler um cardter do 
teclado, escrever um cardter na lmpres- 
sora ou efetuar a leitura de dados de um 
disquete. 

Este 6 o linico modulo dependente 
do had ware e, portanto, escnto pelo 
projetista do sistema. As rotinas existen- 
tes sSo : 

1 ) Rotinas do console : 

- leitura de carater do teclado; 

- sai'da de carater para o terminal: 

- estado do teclado, informando se 
existe ou nao carater disponi'vel. 

2) Rotinas da impressora: 

- sai'da de carater para a impressora: 

- estado da impressora, informando se 
a impressora esta pronta para receber 
um novo dado. 

3) Rotinas do disco: 

selecSo do endereco do registro na 
mem6na; 

- selecao da unidade; 

- selecSo da tnlha: 

- selecao do setor; 

- operacao de leitura: 
operacao de gravacao. 
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Neste mesmo modulo, o usuano m- 
forma ao BDOS o tipo de disco utihza- 
do (fomecendo o niimero de tnllias. de 
setores por tnlha e see removi'vel ou 
na"o) e o niimero de entradas permmdas 
no diretono. 

• BDOS (BASK hisk Operating Sys- 
tem Sistema Basico de OperacOes em 
Disco) 

Este e" o m6dulo responsavel por cnar 
no disco a estrutura de arquivos. Ele ge- 
rencia a distnbuic^o e alocac^o das m- 
formacoes. fazendo com que os progra- 
mas acessem estas informacOes sem se 
prcocupurrm em que tnllia e setor do 
disco esta o registro desejado. BDOS 
interage com o BIOS para executai as 
operacdes sohatadas pelo apbcativo do 
usuano. 

\s funcoes reconhecidas por este mo- 
dulo sao: 

procura de arquivos no diretono: 

cnacao e supress3o de arquivos: 

permissao para que um programa uti- 
lize u in arquivo (0\ 

termino de uso do arquivo t< / 

leiiura fo de registros do ar- 

quivo. 

Embora nao sejam funcOes de opera- 
cao cm disco, o BDOS rcconhece ainda 
as funcoes de tratamento de impressora 
e console. Desta forma, um programa 
ecisara recorrer ao BIOS para se 
utih/ar desses penfencos mantendo. 
portanto. uma estrutura modular. 

Agora vejamos como e' feito o tra- 
tamento Idgico dos arquivos. Um arqui- 
vo e" constituido de registros de tama- 
nho fixo. com 1 28 bytes, guardados em 
blocos. O niimero de registros por blo- 
CO, que tambem e fixo para um dado 
disco, e definido nos para met ros deespe- 
cit'icacao de disco existcntes no BIOS, po- 
dendo assumir os valores 8. 1 6. 32 ou 64. 

Vssoaado ao arquivo ha um codigo 
chamado USER, o qual node vanar de 

a 15. Sua funcSo e permitir que so- 
men te os usua'rios que conhecam o co- 
dlgo de um determmado arquivo possam 
tcr acesso a ele. A pnmeira vista, este re- 
curso pare OS nao ter muito sentido. ja 
que CP M c mono-programavel (ape- 
nas um usuano de cada vez pode fazer 
uso do sistema e nao existe o conceito 

palavra seeredo" associado ao 

1 SI R ): no entanio. USER serve para di- 
vidlf disco por tarefas. de forma que 
quern cstiver hdando com uma nao m- 
terfira nos arquivos de outra. Esta ca- 
raeteri'stiea. mclui'da nas versoes poste- 
nores a 2.0. existe tambem para manter 
a compatibilidade dos arquivos com o 
sistema multiusuano MP/M. irmao 
maior. pore'm mais recenle. do CP M. 

• CCP (Console Command Processor 
Processador de Comandos da Console) 

I sic e o modulo nuns e\lerno. aque- 
le que utiliz.a o BDOS para interagir 
com o operador e executai os eomandos 
sohcitados. 













Memoria 
minima de — < 
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0000H 
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BDOS 
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Area disponivel aos 
proqramas transientes 

















h'itnira 2 Distribuifdo Jo CP'M na nicmnria 



tern duas classes de comando:os 
que sao executados pelo propno CCP e 
bati/ados de comandos intn'nsecos;e os 

casjonam a carga de um programa 
que esteja em disco para a memona c 

toi micro de execucSo. Estes sao 
chamados de comandos transientes. 

( )s comandos intrinsecos sao: 

1 ) DIR - Fomece o Lndice dos arquivos 
que estao no disco. 

2) ERA - Supnme arquivos do disco. 

3) TYPE - Mostra o conteudo dos ar- 
quivos. 

4) SAVE - Guarda a image m da memo- 
na em um arquivo. 

5) REN - Altera o nome de um arqui- 
vo. 

6) USER - Define a classe de utilizacSo 
dos arquivos pelo usuano. 

A figura 2 mostra como o CP/M se 
distnbui na memona de um sistema. Co- 
mo pode ser observado. alem da restn- 
9ao do microprocessador - que deve sa- 
ber executai uistrucoes 80N0 e neces- 
sano que exista memona de leitura/gra- 
vacSo ( RAM) a partir de 0000. 

\ paema inicial de memona. que 
compreende os 256 bytes localizados 
entre 0000H e 00FFH, c reservada para 
CP M e con tern, entre outras coisas.o 
ponto de enfrada para o mi'cio do Siste- 
ma Operacional, denominado pulo in- 
condicional (JMP), o qual corresponde a 
posuja'o mais in tenor do BDOS. 

\i raves desie para metro, os progra- 
mas podem calcular o espaco de memo- 
na disponivel e utihza-lo de forma efi- 
cienie (e bom lembrar que o CP M na"o 
possui geienciamento de memona). 

Cabe ainda observar que. ao ser mi- 

aada a execucfo de um comando tran- 

siente. torna-se desnecessana a presenca 

do CCP na memona e. portanto. esta 

pode ser utihzada para trabalho. 



CONCLUSAO 

O prcsente artigo n3o tern como ob 
jetivo ensinar a um usuano como faze 
uso do CP/M. mas sim fornecer uma vi 
s;io geral sobre este Sistema Oneracio 
nal que e muito popular gracas a simpb 
cidade com que pode ser instalado en 
um bardware que obedeca as restnc.(5es 
ate aqui descntas. Alem disso. existe 
uma infinita quantidade de proiiranuis 
ja desenvolvidos para ele. tais como 
comptladores. processadores de texto e 
banco de dados. 

Segundo a filosofia do artigo. as m- 
formacoes neccssanas para o desenvolvi- 
mento de um programa que utilize os re- 
cursos do CP/M foram omitidas. mas po- 
dem ser obtidas atrave's de uma consulta 
aos manuals "CP'M Interface Guide" c 
"( T \1 User's Guide", que contem in- 
formac^es sobre o formato dos coman- 
dos, seus parametros e areas de dados 
necessanas. 
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Vista sua tarda, assuma o lugar do Capitao Kirk e pode ir dando 
as primeiras ordens ao Sr. Spock. Vai comegar a Jornada nas Estrelas, no TK82-C 



Jornada nas Estrelas 



Kazimierz Malachowski 



Voce est2 no comando da espa- 
^onave Enterprise e recebe or- 
dens de limpar a Galaxia de 

Klingons, seus inimigos mortals. A Ga- 
laxia consta de 64 Quadrantes e as espa- 
9onaves lnimigas estao escondidas nestes 
Quadrantes, ameacando as Bases Estela- 
res. 

Voce so tem um certo niimero de 
dias para executar a tarefa e dispoe dos 
seguintes comandos: 

D - Didno de bordo. Indica o niime- 
ro de dias que faltam, a energia disponi- 
vel, os torpedos que ainda nao foram 
disparados, os Klingons abatidos e os 
que faltam, o niimero de pontos que vo- 
ce ja" fez e demais dados de interesse do 
capitao. 

Q - Apresenta todos os dados do 
Diano. acrescidos de um mapa do Qua- 
drante. 

R - Apresenta uma visao dos Qua- 
drantes arcunvizinhos ao seu, na forma 
de tres numeros (103, por exemplo), 
onde: 

* o pnmeiro digit o indica o niimero de 
Klingons no Quadrante ; 

* o digito do meio indica o niimero de 
Bases no Quadrante ; 

* o ultimo digito indica o niimero de 
Estrelas no Quadrante. Este dado 6 im- 
portante porque a forca das naves Klin- 
gons £ proporcional ao niimero de es- 
trelas existentes no Quadrante: quanto 
mais estrelas houver no Quadrante, 
mais resistentes e ameacadoras senTo as 
naves Klingons \i escondidas. 

Se no lugar dos numeros aparecerem 
tres astenscos (***), isto significa que 



voce esta no lirmte da Gahixia e que este 
Quadrante nao pertence a ela. 

B — £ a Biblioteca da espaconave 
Toda vez que voce entra num Quadran 
te, os dados relativos a ele passam a fa 
zer parte do arquivo da Biblioteca, po 
dendo ser consultados a qualquer mo 
mento. Alem disso, cada vez que voce 
pesquisa os Quadrantes arcunvizinhos 
(R) os dados destes Quadrantes tambe'm 
vao para o arquivo. Os Quadrantes ain- 
da nao pesquisados ou visitados apare- 
cem na Bibboteca na forma de asteris- 
ks (**). 

N - NavegacSo. A espaconave Enter- 
prise se movimenta na Galaxia atrave"s 
de coordenadas (IJ, onde I = hnha e 
J = coluna) e com velocidade propor- 
aonal a forca apbcada no Wrap, que 
movimenta a nave a uma velocidade su- 
perior a da luz. Naturalmente, quanto 
maior a velocidade, menos dias sera"o gas- 
tos na viagem e mais energia da nave se- 
ra' consumida. 

Se voce estiver no mesmo quadrante de 
uma base estelar e apertar N, o progra- 
ma perguntara se voce quer entrar em 
6rbita (a linica forma de se efetuarem 
reparos e o abastecimento da nave), com 
o comando 0, ou mudar de quadrante, 
com M. 

C — Combate. £ quando voce decide 
enfrentar os Klingons. Nem sempre voce 
e" o primeiro a atacar, e quando voce e 
atacado o programa lhe coloca duas 
opcSes: F para fugir e D para se defen- 
der e tentar continuar o combate. Para a 
defesa, voce e obngado a desviar alguma 
forca para os escudos e... rezar. Durante 



todo o tempo do combate, o estado das 
defesas tanto da Enterprise quanto dos 
Klingons fica visivel (o normal e" 1). 
Quando surgir uma oportunidade de ata- 
que, voce tera duas opcoes: usar osfaso- 
res (F), que gastam energia da nave para 
atingir o adversdno com jatos de forca. 
ou os torpedos (T), que sa*o em niimero 
reduzido, embora na*o consumam ener- 
gia e tenham praticamente o mesmo 
efeito dos fasores. Voce podera ainda re- 
tirar-se (R). no momento propicio a um 
ataque. caso considere esta uma boa 
opc^o estrategica. 

Um combate tenruna quando um dos 
lados tem sua(s) nave(s) destruida(s)ou 
quando a Enterpnse consegue fugir. 

A — Relatono de Avanas. £ muito 
util, pnncipalmente se voce desejar via- 
jar em velocidade ultra-luz com gerado- 
res avanados ou fazer uso da Bibboteca. 
que pode estar com seus dados trocados. 
Aldm disso, o propno Relat6no de Ava- 
nas pode ser atingido e voce s6 sabera o 
que esta ou nao funcionando na hora 
"H" 

£ bom habito de jogo consultar o Rela- 
tdno de Avanas sempre apos um com- 
bate. 

S - Permite gravar o jogo com todos 
os dados daquele momento para uma 
continuacSo posterior. 

X — Rendic^o incondicional. A pon- 
tuaffo 6 fomeada e outro heroi e con- 
vidado para assumir o comando da En- 
terpnse em novas batalhas. 
Agora vamos apresentar algumas notas 
sobre o programa. Utilizei alguns expe- 
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dientes para economizar mem6na. 
programa normalmente cabena em 16 
Kb, mas, com a economia, mais mem6na 
fica disponivel para o acrdscimo de novos 
comandos. opcoes ou sofisticac5es. 
(Convido os leitores a apnmorarem o 
programa e introduzirem modificacSes 
no jogo, pois nSo tive tempo de real- 
mente estudar todas as possibihdades. 
Acredito que tanto o Combate como a 
NavegacSo podem ser substancialmente 
melhorados.) 

Notadamente, uuhzei letras em vez 
de numeros e abusei da utihzacao da 
funcao VAL, que economiza alguns by- 
tes. (Todas as vanaveis estSo defmidas 
entre ashnhasOe 160). 

Para entender o programa, o seguin- 
te roteiro de linhas pode ser acompa- 
nhado: 

- As hnhas 170 a 610 lrucializam o 

jogo. 

- As hnhas 625 a 750 desenham o ma- 
pa do Quadrante. 

- As hnhas 800 a 869 definem o for- 



mato da tela que ira acompanhar o jo- 
go inteiro. 

- As linhas 1000 a 1015 distnbuem o 
jogo. 

- Na linha 5000 comeca a rotma de 
Navegacfo (N). 

- Na hnha 5110 comeca uma sub-roti- 
na de protecSo. 

- Na hnha 5500 comeca a rotina de 
pesquisa nos Quadrantes circunvizinhos 

(R). 

- Na hnha 6000 iniciam-se as rotinas 
do Diano (D) e do Quadrante (Q). 

- Na hnha 6500 comeca a rotina C de 
combate. Os parametros que definem a 
luta dependem de uma se"rie de fatores, 
como energia, niimero de Estrelas, mi- 
mero de Klingons, niimero de Bases, 
dias que faltam para executar a tarefa, o 
estado de defesa dos Klingons, o estado 
de Avanas da Enterprise e finalmente, 
como nao podia deixar de ser. um fator 
randomico. £ formada uma equacao, 
cujo resultado (RC) determina a sorte 
do combate . 



- Na linha 6560 e dada a noticia do de- 
sapareamento da Enterprise. 

- Na linha 8000 micia-se a rotma de 
Avanas. 

- Na hnha 8500 micia-se a rotma da 
Bibhoteca. 

- Na hnha 9000 micia-se a rotina da 
desistencia. 

- Na hnha 9500 inicia-se a rotina que 
impnme a lista de todos os comandos 
automaticamente toda vez que o capitao 
apertar uma tecla errada. 

- Na hnha 9600 esta" o desenho da En- 
terprise que aparece no inicio do pro- 
grama. 

- Na linha 9950 esta a rotina de grava- 
cao. 

- Na hnha 9980 e" dada a noticia da vi- 
tbria. 

O programa roda em micros compa- 
tiveis com o TK82-C (como o TK85, 
CP-200, NE-Z8000, Sinclair ZX81 e ZX 
Spectrum) e deve ser rodado em FAST, 
)£ que em SLOW fica muito lento e, 
depois de algum tempo, tedioso. 





Super Star Trek 


— Jornada nas Estrelas 







?1? pRTNT "I********************; 


REM | SUPER STARTREKi KJM 


1************1 •• 


1 


LET N=VAL "0" 


213 PRINT , ,"AGUARDE AS SUAS OR 


2 


LET A=VAL "1" 


DENS, CAPITAO." 


3 


LET B=A+A 


214 PAUSE M*D 


4 


LET C=A+B 


300 DIM V(H,H) 


5 


LET D=B+B 


310 DIM Q(H,H) 


6 


LET E=C+D 


460 LET K1=INT (RND*L)+H 


7 


LET F=D+D 


461 LET K0=K1 


8 


LET G=C*C 


462 FOR I=A TO Kl 


9 


LET H=G+A 


463 LET X=B+INT (RND*F) 


10 


LET K=D*D 


464 LET Y=B+INT (RND*F) 


11 


LET L=F*C 


465 IF Q(X,Y)>=D+M THEN GOTO VA 


12 


LET T1=H 


L "463" 


13 


LET P1=N 


466 LET Q(X,Y)=Q(X,Y)+M 


14 


LET C1=N 


467 NEXT I 


18 


LET T=D+A 


500 LET B1=INT (RND*H)+B 


19 


LET E1=VAL "3000" 


501 FOR I=A TO Bl 


20 


LET M=H*H 


502 LET X=B+INT (RND*F) 


21 


LET P=VAL "855" 


503 LET Y=B+INT (RND*F) 


22 


LET R=B/H 


504 IF Q(X,Y)-(INT (Q(X,Y)/M))* 


23 


LET Q=R/B 


M=H*B+A THEN GOTO VAL "502" 


24 


LET SS=VAL "9600" 


505 LET Q(X,Y)=Q(X,Y)+H 


25 


LET ST=VAL "9700" 


506 NEXT I 


26 


LET TT=VAL "9750" 


525 FOR I=B TO G 


27 


LET HH=VAL "21" 


526 FOR J=B TO G 


28 


LET TR=VAL "9800" 


527 LET Q(I,J)=Q(I,J)+C+INT (RN 


29 


LET CK=A 


D*E) 


30 


LET CE=A 


528 NEXT J 


31 


LET CC=VAL "4E4" 


529 NEXT I 


33 


LET Z=VAL "5110" 


550 LET Dl=(INT (RND*D) +A+K1) *H 


45 


DIM U(G) 


551 LET Q1=INT (RND*F)+B 


100 


FOR I=A TO G 


552 LET Q2=INT (RND*F)+B 


105 


LET U(I)=A 


553 LET D0=D1 


110 


NEXT I 


600 PRINT AT K-A,N;"EIS AS ORDE 


153 


DIM Q$(F,K) 


NS : " , , " 


154 


LET D$= "VERDE" 


ENTERPRISE DEVE DESTRU 


155 


LET ES=1BMBIir 


IR ";Kl,"ESPACONAVES KLINGON EM 


156 


LET C$="CONDICAO " 


" ; Dl ; " DIAS . " 


157 


LET B$="AMARELA" 


601 PRINT " PARA O REABASTECI 


158 


LET A$="DSNRQCABX" 


MENTO HA ";B1, "BASES ESTRELARES. 


170 


CLS 


APERTE 3 CASO ESTEJA PRONTO E B 


200 


GOSUB SS 


OA SORTE. . . " 


205 


GOSUB ST 


605 PAUSE CC 


206 


PRINT "SEU NOME, CAPITAO?" 60 9 IF INKEY$<>"S" THEN GOTO VA 


207 

210 


INPUT X$ 

PRINT AT H+A,N; "CAPITAO: 


L "60^" 


SR ft 20 REM FORMACAO DO QUADRANTE; 


";XS;" 


6 25 FOR I=A TO F 


211 


PRINT "PRIMEIRO OFICIAL: 




SPOCK",, , 


635 NEXT I * 



Kazimierz Josef Malachowski e" Engenheiro 
Eletrdnico, trabalhando como Gerente Co- 
mercial de TransmissSo da Sul Ame'rica Philips 
Telecom unicacdes, em Sao Paulo, e tern na 
programacSo de micros o sou hobby. 



MICRO SISTEMAS, outubro/83 



TK-82 TK-85 
CP-200 






Formula 1 
Commander 
k Guerra no Pacifico 
J Caca ao Tesouro 
f Simulator de Voo 
f Estoque 1 

Microcalc 
Defender 
Master (xadrez) 
Speed Racer 
e muitos outros 

Cartucho Atari 
Apl»catiwos p/CP-500. Digitus e Polimax 

Distnbuicao exclusiva de programas das 
marcas mcROUNE infinituS e supersoft 

PECA LISTA DE PRECOS 



D 



DIGITAL 

o endereco dos microcomputadores 

Rua da Conceicao. 377/383 
Fone: (0512) 24 1411 
90000 Porto Alegre RS 



JORNADA NAS ESTRELAS 



640 LET S1=INT (RND*F)+A 

645 LET S2=INT (RND*F)+A 

650 LET Q$(S1,S2)=TE" 

655 LET K2=INT (Q(Q1,Q2)/M) 

660 LET B2=INT ( (Q (Q1,Q2) -K2*M) 

m 

665 LET G2=Q(Q1,Q2)-(INT (Q(Q1, 
Q2)/H))*H 
670 IF K2=N THEN GOTO VAL "700" 
675 FOR I=A TO K2 
6 80 GOSUB TT 
695 LET Q$(X,Y)="K;" 

699 NEXT I 

700 IF B2=N THEN GOTO VAL "735" 
70 5 FOR I=A TO B2 

710 GOSUB TT 

725 LET Q$(X,Y)="E" 

730 NEXT I 

735 FOR I=A TO G2 

740 GOSUB TT 

745 LET Q$(X,Y)="ffl" 

750 NEXT I 

805 GOSUB SS 

810 IF Dl =N THEN GOTO VAL "895 

°815 PR INT " QUADRANTE " ; Ql-A; " , " 
; Q2-A; " l«=>1 SETOR " ; S 1 ; " . " ; S2 

816 LET V(Q1,Q2)=A 

817 PRINT , ,TAB E; 

820 IF K2=N THEN GOTO VAL "835 " 

825 PRINT C$+E$ 

830 GOTO VAL "855" 

835 IF CE=A THEN GOTO VAL "850" 

840 PRINT C$+B$ 

845 GOTO VAL "855" 

850 PRINT C$+D$ 

855 PRINT AT HH,N;"SUAS ORDENS? 

856 PAUSE CC 

857 PRINT AT HH,N;" 

860 LET Z$=INKEY$ 

865 IF Z$="" THEN GOTO P 

999 REM COMANDOS 

1000 FOR I=A TO G 

1005 IF Z$=A$(I) THEN GOTO VAL " 

1015" 

1010 NEXT I 

1011 GOTO VAL "9500" 

1015 GOTO (Z$="D") *6000+(Z*="S") 
*9950+(Z$="N") *500O+(ZS="R") *550 
0+<Z$="Q") *6000+(Z$="C") *6500+(Z 
$="A") *8000+(Z$="B") *8500+(Z$="X 
")*9000 

4999 REM 

5000 IF B2<>N THEN GOTO VAL "50 7 
5" 

5010 GOSUB TR 

5012 PRINT AT T,N;"SP. SPOCK PERG 

UNTA: COORDENADAS?" ;AT E,T; "Ql-> 

5014 GOSUB Z 

5015 PRINT Q0;TAB T;"Q2->"; 

5016 LET Q3-Q1 

5017 LET Q1=Q0+A 

5020 GOSUB Z 

5021 PRINT Q0;TAB T; "WARP (l->8) ? 

5022 LET Q4=Q2 

5023 LET Q2=Q0+A 

5025 GOSUB Z 

5026 PRINT Q0 

5030 PRINT , ,"SR SPOCK INFORMA: 
CHEGAREMOS AO QUADRANTE ";Q1-A;" 
, ";Q2-A; " EM "; 

5035 LET D9=SQR ( (ABS (Q2-Q4))** 
B+(ABS (Q1-Q3))**B) 

5036 LET D9=(T/H>=(D9-INT D9) ) * ( 
IMT D9)+(T/H<(D9-INT D9))*(INT ( 
D9+T/H) ) 

5037 LET D9=H*(R*D9+B-U(A)+AMU( 
A)jN)-QO«Q) 

5*38 LET QO=QO*M*(D9/H)+M*(A-U(B 
)) 



5040 PRINT D9;" DIAS . " , , , "VAMOS 
EMPREGAR " ;Q0 ; " UNIDADES . " 

5050 LET D1=D1-D9 

5051 LET E1=E1-Q0 

5052 PAUSE M*C 

5060 IF D1<=N OR E1<=N THEN GOTO 

VAL "6562" 
50 70 GOTO VAL "6 25" 

5075 GOSUB TR 

5076 PRINT AT T,N;"SR SPOCK PERG 
UNTA: VAMOS ENTRAR EM g^RBITA OU 

HIUDAR DE QUADRANTE?" 

5077 PAUSE CC 

5080 IF INKEY$="" THEN GOTO VAL 
"5076" 

5081 IF INKEY$="M" THEN GOTO VAL 
"5010" 

5082 IF INKEY$<>"0" THEN GOTO VA 
L "5077" 

5083 IF K2=N THEN GOTO VAL "5086 

5084 PRINT ,,"NAO PODEMOS ENTRAR 
EM ORBITA COMKLINGONS NO QUADRA 

NTE, SENHOR." 

5085 GOTO P 

5086 LET A1=N 

5090 FOR I=A TO G 

5091 LET A1=A1+U(I) 

5092 NEXT I 

5093 LET D9=(G-A1+R*B) *H 

5094 PRINT ,,"FICAMOS EM ORBITA 
PARA REPAROS POR " ; D9 ; " DIAS, C 
OMANDANTE . " 

5096 FOR I=A TO G 

5097 LET U(I)=A 

5098 NEXT I 

5099 LET CE=A 

5100 LET D1=D1-D9 

5101 LET T1=H 

5105 LET E1=VAL "3000" 

5106 GOTO P 

5110 INPUT Q0 

5111 IF Q0<A OR Q0>F THEN GOTO Z 

5112 LET Q0=INT Q0 

5113 RETURN 
54 99 REM R 

5500 LET D1=D1-R 

5501 GOSUB TR 

5502 IF U(C)=N THEN GOTO VAL "55 
71" 

5505 LET I=E 

5510 FOR X=Q1-A TO Ql+A 

5515 LET J=H 

5520 FOR Y=Q2-A TO Q2+A 

5525 IF Q(X,Y)=N THEN PRINT AT I 

,J;"***" 

5530 IF Q(X,Y)<M AND Q(X,Y)>=H T 

HEN PRINT AT I , J; "0" ;Q (X,Y) 

5535 IF Q(X,Y)<H AND Q(X,Y) >N TH 

EN PRINT AT I , J; "00" ;Q (X, Y.) 

5540 IF Q(X,Y)>=M THEN PRINT AT 

I,J;Q(X,Y) 

5545 IF Q(X,Y)<>N THEN LET V(X,Y 

)=A 

5550 LET J=J+D 

5555 NEXT Y 

5560 LET I=I+B 

5565 NEXT X 

5566 IF U(C)<A THEN GOTO VAL "55 
80" 

5570 GOTO P 

5571 PRINT AT T,N; "SENSOR DE QUA 
DRANTES VIZINHOS DESTRUIDO, CA 
PITAO. " 

5572 GOTO P 

5580 PRINT AT T,N; "SENSOR AVARIA 
DO."; AT E,H+B;" " , " ";AT G,H+ 

F; " " 

5585 GOTO P 

5999 REM jgj 

6000 LET D1=D1-R 

6001 GOSUB TR 

6002 IF U(D)=N AND Z$*"Q" THEN P 



RINT AT T # N;"SENSORES LOCAIS",," 

DESTRUIDOS, SR.",,"SO FUNCIONAM 

OS", , "RELATORIOS" 

6003 IF U(D)=N OR Z$="D" THEN GO 

TO VAL "6030" 

6005 FOR I=A TO F 

6007 FOR J=A TO F 

6008 IF K2<>N THEN GOTO VAL "601 
0" 

6009 IF Q$(I,J)="K" THEN LET Q$ ( 
I, J)-"." 

6010 PRINT AT I*B+C,N+J*B-B;Q$(I 
,J) 

6015 NEXT J 

6020 NEXT I 

60 30 PRINT AT T,K;"FALTAM ";INT 

Dl;" DIAS"; AT E,K ; "TORPEDOS : " ;T1 

;AT G,K;"ENERGIA:";E1;AT H+A,K;" 

ESCUDO : " ; Cl ; AT H+C , K ; " KLINGONS " ; 

AT H+D,H+F; "DESTRUIDOS: ";K0-K1;A 

T K-A,H+F;"FALTAM:";K1;AT K+A,K; 

"BASES: ";B1;AT K+D,K; "PONTOS:";P 

1 

6035 GOTO P 

6499 REM gj 

6500 GOSUB TR 

6501 IF Q(Q1,Q2) M THEN PRINT AT 
T,N;"SR SPOCK CANCELOU O ALARME 

.","0 QUADRANTE ESTA LIMPO DE"," 
KLINGONS . " 

6502 IF Q(Q1,Q2)<M THEN GOTO P 

6503 PRINT AT HH-B,N; "ENTERPRISE 
", "KLINGONS", "DEFESA: ";CE, "DEFE 
SA: ";CK 

6505 LET I=RND 

6506 LET AD=A*(I>=R*B) 

6509 LET D1=D1-R 

6510 IF AD=A THEN GOTO VAL "6580 

6515 PRINT AT T+A,N; "KLINGONS AT 

ACANDO COM FORCA : " ; CK 

6520 PRINT ,, "ENTERPRISE EM ";C$ 

; (D$ AND CE=A) ; (B$ AND CE<A AND 

CE>=R*C) ; (E$ AND CE<R*C) 

6525 PRINT , , "SR SPOCK PERGUNTA : 

","EUGA OU BE FES A" 

6528 PAUSE CC 

6531 IF INKEY$="F" THEN GOTO VAL 
"5000" 

6532 IF INKEY$o"D" THEN GOTO VA 
L "6528" 

6534 IF C1>=C/D*E1 THEN GOTO VAL 
"6543" 

6539 PRINT AT H,N;Cl;" UNIDADES 
NO ESCUDO.", "FORCA PARA ESCUDO? 

(0->";INT (C/D*E1-C1) ;") " 

6540 INPUT CO 

65 41 IF C0>C/D*E1 THEN GOTO VAL 
"6540" 

6542 LET C1=INT (C1+C0) 

6543 LET E1=E1-C0 

6545 LET AK= (E1*RND*CK+M*H *RND) * 
K2 

6546 LET DE=C1*CE*U (T) +B2*M*H+M* 
G2 

6547 LET RC=AK-DE 

6548 LET CI=A* (RC<=M) +R*D* (RC>M 
AND RC<=M*G)+R*B*(RC>M*G) 

6550 IF CI=A THEN GOTO VAL "6500 

6551 IF CI=R*D THEN LET CE=CE-R 

6552 IF CI=R*B THEN LET CE=CE-R* 
B 

6554 FOR J=A TO C 

6555 LET I=INT (RND*G)+A 

6556 LET U(I)=U(I)-(N AND CE=A) - 
(R AND CE<A AND CE>=R*C) - (R*R AN 
D CE<R*C) 

6557 NEXT J 

6558 LET Cl= (Cl-M) * (CE>=R*D) + (Cl 
-M*B)*(CE<R*D) 

6559 IF C1<N THEN LET C1=N 

6560 IF CE>N THEN GOTO VAL "6500 
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6562 CLS 

6563 print "|*»*»»»»»»*noticia ex| 
jtrX"********) " 

6566 PRINT ,," NO "; DO-INT Dl; 
"(LDIA DA SUA VIAGEM, A","USS EN 
TERPRISE, SOB COMANDO DOSR " ; X 

6567 PRINT , , "E DO PRIMEIRO OFIC 
IAL, SR SPOCK,DESAPARECEU NO QUA 
DRANTE ";Q1-A;",";Q2-A 

6568 PRINT "DA NOSSA GALAXIA, CO 
M ";INT (RND*E*M)+M 

6569 PRINT "TRIPULANTES A BORDO. 
" , , , "A CONFEDERACAO TERRESTRE ES 
TA DE LUTO .",,,, 

6570 FOR I=A TO E+G 

6571 PRINT "STJ53"; 

6572 NEXT I 

6573 PAUSE M*E 

6575 CLS 

6576 GOTO VAL "9000" 

6580 PRINT AT T+A,N; "PODEMOS ATA 
CAR COM FORCA ";CE 

6581 PRINT ,, "ENTERPRISE EM ";C$ 
; (D$ AND CE=A) ; (B$ AND CE<A AND 
CE>=R*C) ; (E$ AND CE<R*C) 

6582 PRINT , , "SR SPOCK PERGUNTA: 
"."^TIRADA, 5JDRPED-OS OU £JASERS" 
65 84 PAUSE CC 

6586 IF INKEY$="R" THEN GOTO VAL' 
"5000" 

6587 IF INKEY$="F" THEN GOTO VAL 
"6610" 

6588 IF INKEY$o"T" THEN GOTO VA 
L "6584" 

6589 IF T1=N THEN GOTO VAL "6700 

6590 GOSUB TR 

6591 PRINT AT T,N;"SR SPOCK INFO 
RMA: TEMOS: " ;T1 , "TORPEDOS . HA N 
ESTE QUADRANTE " ;G2 , "ESTRELAS . O 

LANCADOR DE TORPEDOSESTA COM "; 
U(E) *M; ""■/■DE EFICIENCIA." 

6592 PRINT "NOSSA CHANCE DE EXIT 
O E: ";U(E) * ( A-G2/ (B*II ) ) 

6593 LET J=RND 

6595 PRINT ,,,,(" LANCADO O TORPE 
DO" AND K2=A) ; ("LANCADOS DOIS TO 
RPEDOS" AND K2=B) 

6596 LET Tl=Tl-K2 

6597 PAUSE M*D 

6599 PRINT , , ( "KLINGONS DESTRUID 
OS" AND U(E) *(A-G2/(B*H) ) >=J) ; (" 
ERRAMOS" AND U (E) * (A-G2/ (B*H) ) <J 
) 

6600 PAUSE M*A 

6601 IF U(E)*(A-G2/(B*H) )<J THEN 
GOTO VAL "6500" 

6602 LET K1=K1-K2 

660 3 IF K1=N THEN GOTO VAL "99 80 

6604 LET Q(Q1,Q2)=Q(Q1,Q2)-M*K2 

6605 LET P1=P1+K2+K0-K1 

6606 PRINT AT C,E;C$;D$;" 

6607 LET K2=N 

6608 LET CK=A 

6609 GOTO VAL "6500" 

6610 GOSUB TR 

6611 PRINT AT T,N;"SR SPOCK INFO 
RMA: OS FASERS TEM ";U(T)*M;" ■/ 
kDE EFICIENCIA. TEMOS" 

6612 PRINT El;" UNID. DE FORCA D 
ISPONIVEIS'V'QUAL A FORCA PARA O 
S FASERS?" 

6615 INPUT Fl 

6616 LET F1=(E1*(F1>E1)+F1MF1< = 
El) ) *U(T) 

6620 LET AE=Fl*CE*M*R+B2*M*C 

6621 LET DK=(F1*RND+M*CK+M*G2) *K 
2 

6623 LET E1=E1-Fl 

6624 IF E1<=N THEN GOTO VAL "656 

1" 

66 25 LET RC=AE-DK 



6630 LET CI=A* (RC<=M) +R*D* ( ROM 
AND RC<=M*G)+R*B*(RC>M*G) 

6631 IF CI=A THEN GOTO VAL "6500 

6632 IF CI=R*B THEN LET CK=CK-R* 
B 

6633 IF CI=R*D THEN LET CK=CK-R 
66 35 IF INT CK>N THEN GOTO VAL " 
6500" 

6640 GOTO VAL "660 2" 

6700 PRINT "SR. SPOCK INFORMA: N 
AO HA MAIS TORPEDOS, TEMOS QUE 
USAR FASERS." 

6701 PAUSE M*C 

6705 GOTO VAL "6610" , 

7999 REM RELATORIO DE AVARIASj 

8000 GOSUB TR 

8001 LET D1=D1-R 

8002 PRINT AT T ,D+B; "RELATORIO D 
E AVARIAS" 

8003 IF U(F)=N THEN GOTO VAL "80 
30" 

8006 PRINT AT F, N; "^PROPULSAO:HU 
LTRALUZ : " ; TAB H+A; "gSUBLUZ : " 

8007 PRINT "'iSENSORES: fcjGALATICO 
S:";TAB H+A; "ffi UADRANTE : " 

8008 PRINT "jCOMBATE: gESCUDO:" 
;TAB H+A; "gFASERS : " ;TAB H+A; "5*rO 
RPEDOS : " 

8009 PRINT "SCOMPUTADOR^IBLIOTE 
CA : " ; TAB H+A ; '®>JAVEGACAO : " 

80 20 FOR I=A TO G 

8025 IF U(I) =N THEN PRINT AT I+E 
,HH+B; "DESTRUIDO" 

8026 IF U(I)<A AND U(I)>N THEN P 
RINT AT I+E,HH+B;U(I) *100; " ! . 

8027 IF U(I)=A THEN PRINT AT I+E 
,HH+B; "NORMAL" 

8030 NEXT I 

80 31 GOTO P 

8033 PRINT "SISTEMA DE CONTROLE 

DE AVARIAS FORA DE ACAO, SENHOR 

80 35 GOTO P 

8499 REM BIBLIOTECA 

6500 GOSUB TR 

8501 IF U(F)<>N THEN GOTO VAL "8 
50 4" 

8502 PRINT AT T , N ; " * ATE NCAO*] BIB 
LIOTECA DESTRUIDA" 

850 3 GOTO P 

8504 IF U(F)<>A THEN PRINT AT T, 

N ; " !*ATENCA6*| BIBLIOTECA AVARIAD 

A. DADOS NAO CONFIAVE 

IS." 

850 8 PRINT AT F,E;"MAPA DA GALAX 

IA";AT H,N; 

8509 FOR I=B TO INT (G*U(F)) 

8510 FOR J=B TO INT (G*U(F)) 
8515 IF V(I,J)=N THEN PRINT "*** 

8520 IF V(I,J)=A THEN GOSUB VAL 

"85 40" 

8525 NEXT J 

85 30 NEXT I 

8531 LET D1=D1-R 

85 35 GOTO P 

8540 IF Q(I,J)>=M THEN PRINT Q(I 

,J);" "; 

8545 IF Q(I,J)<M AND Q(I,J)>=H T 

HEN PRINT "0";Q(I,J);" " ; 

8550 IF Q(I,J)<H THEN PRINT "00" 

;Q(I,J>;" "; 

8555 RETURN 

8984 REM TERM I NO POR FALTA DE TEJ 
,MPO 

8985 GOSUB TR 

8990 PRINT AT E,N;"0 TEMPO ACABO 

U, ";X$ 

8995 GOTO_VAL "900 5" 

8999 REM DESISTENCIA 

9000 GOSUB TR 

9005 PRINT AT G,N; "QUE PENA CAPI 
TAO,",,,"0 SR TINHA ";P1;" PONTO 



S.";AT HH,N;"ALGUEM SE HABILITA? 

(S/N) " 

9006 PAUSE CC 

9015 IF INKEY$="S" THEN RUN 

9020 CLS 

90 30 STOP 

9499 REM IJSTA DE COMANDOS 

9500 GOSUB TR 

9501 LET D1=D1-R 

9505 PRINT AT E , N; "g-GRAVAR" ;TAB 
N; "iDi-DIARIO DE BORDO";TAB N ; "§- 
NAVEGACAO-ESCOLHA DA ROTA";TAB N 
; "R- SENSOR P/ QUADRANTES VIZINHO 
S " ; TAB N ; "§-MAP A DO QUADRANTE " ; T 
AB N; "S-COMBATE";TAB N; 'ffi-RELATO 
RIO DE AVARIAS";TAB N; "3-BIBLIOT 
ECA";TAB N; "gj-DESEJA DESISTIR" 
9510 GOTO P 

9600 CLS 

9601 PRI NT "******** SUPER START 
IREK ********"" 

960 2 RETURN 

9699 REM DESENHO DA ENTERPRISE' 

9700 PRINT AT B,K;", * 



9701 PRINT ",■ 



9702 PRINT --"" 

/ / 

9703 PRINT TAB G;", , ";TAB H+G; " 
/ /" 

9704 PRINT TAB T; ", / 

/— , 

9705 PRINT TAB E-A; 



9707 PRINT 



iH 



S ENTERPRISE, 



[ WCC-170J. 

9709 RETURN 

9750 LET X=INT (RND*F)+A 

9751 LET Y=INT (RND*F)+A 

9752 IF Q$(X,Y)<>"." THEN GOTO T 
T 

975 3 RETURN 

9800 FOR J=T TO H+H 

9801 PRINT AT J,N; " 

9802 NEXT J 

9803 RETURN 

9949 REM H 

9950 GOSUB TR 

9951 PRINT AT G,N;"S GRAVA NA FI 
TA",,"k RETORNA AO JOGO" 

995 2 PAUSE CC 

9954 IF INKEY$="R" THEN GOTO P 

9958 IF INKEY$<>"S" THEN GOTO VA 
L "9952" 

9959 SAVE "TREK" 

9960 GOTO P 

9980 CLS 

9981 PRINT ■'*<* «**« *»«NOTIC: 
T RA ********* '" 

9982 PRINT ,," NO ";D0-INT Dl; 
"■ DIA DA SUA VIAGEM, A'V'USS EN 
TERPRISE, SOB O COMANDO DOSR ";X 

$ 

9984 PRINT "E DO PRIMEIRO OFICIA 
L, SR SPOCK, INFORMOU TER LIVRADO 
A NOSSA GA-LAXIA DA ULTIMA ESPA 
CONAVE KLIN-GON. A CONFEDERACAO 
TERRENA, EM SINAL DE REGOZIJO. D 
ECRETOU UMA SEMANA DE FESTIVIDAD 
ES E CONDE- COROU O CAPITAO -",X$ 
99 85 PRINT "COM O TOTAL DE ";P1; 
" MEDALHAS", "PELO SEU FEITO HERO 
ICO.", , , 

9986 FOR I=A TO F*D 

9987 PRINT "**♦* 

9988 NEXT I 

9989 PRINT AT HH,N;"OUTRO HEROI? 
(S/N) " 

9990 PAUSE CC 

9992 IF INKEY$="S" THEN RUN 

9998 SAVE "TREK" 

9999 RUN 
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O autor de Incrementando um TK (veja MS n° 9) apresenta os esquemas de duas criagoes 
suas.a inversao do video e a automatizagao do cassete no TK82-C 



Inversao de video 
e cassete automatico 



Sergio Cwikla 







artigo Incrementando um TK (MS n9 9,junho/82) 
provocou grande receptividade dos usuanos e proprie- 
taries de micros desta categona. Recebi centenas de 
cartas de vanos lugares do Brasil e do exterior (Miami, Santia- 
go, Buenos Aires) pedindo melhores esclareamentos sobre o 
assunto, o esquema elCtrico, sugestoes, informacoes etc, o que 
veio ainda comprovar o alto grau de penetracao da revista. 

Diante da dificuldade de responder a todas as corresponden- 
cias individualmente, elaborei este artigo que, de forma gene"- 
nca. fornece algumas consideracOes particulares do micro e 
descreve ainda alguns incrementos. 

Importante notar que os esquemas que apresentaremos nes- 
te artigo foram desenvolvidos para a pnmeira versSo do TK82- 
C, que continha mais arcuitos que a versfo atualmente comer- 
cializada. 

VENCENDO AS LIMIT A^OES 

Quando se resolve investir na compra de um microcompu- 
tador pessoal na"o se deve adquinr o pnmeiro modelo que nos 
e oferecido. £ necessdrio que se faca uma escolha critenosa de 
acordo com as necessidades e, logicamente, com as nossas pos- 
sibdidades. Assim, antes de uma tomada de decisSo, devemos 
reunir o maximo de informacoes atraves de cat«Uogos t^cnicos, 
demonstrates em lojas do ramo, artigos publicados em revis- 
tas especializadas, contatos com pessoas possuidoras de micros 
etc, estabelecendo com isso uma relacSo entre o preco e a per- 
formance de cada equipamento, de modo que possamos anah- 
sar qual deles se adapta a nosso caso. 

Para apkcacOes dome'sticas, diditicas, pequenas tarefas co- 
merciais, cdlculos cientiTicos e ate - mesmo para alguns jogos re- 
creativos, o TK82-C ou seu similar NE-Z8000 atendem relati- 
vamente bem, atem de possuirem os precos mais acessfveis do 
mercado nacional. 



desempenho para esta categoria de equipamento pode ser 
consideravelmente melhorado se fizermos uso de recursos de 
programasao ou sub-rotinas em linguagem de miquina, dando 
assim uma maior veloadade e flexibilidade de processamento, 
embora para isso torne-se necessdno que se faca um curso de 
programacao do microprocessador Z80. 

Por outro lado, podemos aumentar a capacidade desses mi- 
cros atrave's da adi?ao de perife"ricos como cassete, disquetes, 
unpressora etc. No TK82-C a mterface de cassete permite ape- 
nas a leitura e gravacSo de programas, sem controlar remota- 
mente o acionamento e desligamento do motor do gravador, o 
que de certa forma torna-se um mcomodo, pois nos obriga a 
ficar aguardando o micro finalizar a leitura ou gravacSo para 
enta"o desligarmos manualmente o gravador. 

Este problema torna-se mais grave em programas extensos, 
ja" que teremos que ficar prestando atencSo no gravador ate" 
que o programa seja passado, pois se o mesmo continuasse a 
rodar ap6s o te"rmino da leitura ou gravac^o do programa, per- 
deriamos a posicffo exata da fita em relacSo a leitura ou grava- 
cSo de um pr6ximo programa, principalmente quando este 6 
parte integrante do anterior (encadeamento de programas). 

Encontramos estas situates quando, por exemplo, vamos 
manipular programas e dados que ultrapassem a mem6ria RAM 
do micro, sofrendo, desta maneira, bmitacOes no armazena- 
mento. Uma das opcoes € desmembrar o programa em duas ou 
mais partes distintas e gravd-las sequenaalmente na fita. Neste 
caso, os dados poderiam ser introduzidos na primena parte, e 
enderecados diretamente na mem6na atravds da instrucflo 
POKE, de forma que na"o se percam com o comando LOAD. 
Finalizada a entrada dos dados, podemos fazer com que o pr6- 
prio programa chame da fita a outra parte integrante, que po- 
dera" ler os dados com a instruct PEEK, fazendo o seu devido 
processamento. 
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£ evidente que o encadeamento de programas de forma au- 
tomdtica depende muito do software, mas necessanamente, 
preasaremos de um circuito auxiliar que hgue e deshgue o mo- 
tor do gravador, trabalhando em sincronismo com a fita. 

A automatizacfo do gravador traz ainda a vantagem de au- 
mento da autonomia da fita, ja que os espacos na gravacao en- 
tre um programa e ou,tro sSo reduzados ao minimo. Isto acon- 
tece porque quando gravamos com o sistema automatizado, ao 
colocarmos o gravador na funcSo REC-PLAY e digitarmos 
SAVE nome do programa e NEW LINE, somente com a digita- 
cao desta ultima tecla 6 que o gravador comecara a rodar, evi- 
tando mclusive que seja gravado aquele ruido que aparece na 
gravacao, antes de se apertar NEW LINE pelo sistema conven- 
cional, muitas vezes prejudicando a leitura do programa, fa- 
zendo com que o micro fique moperante. Quando isto ocorre, 
temos que desligar o micro e, apos alguns segundos, ligaMo no- 
vamente ate* surgir o cursor K no canto inferior esquerdo do 
video. 

Este problema pode ser sanado com a adaptacaode um cir- 
cuito que controle remotamente o motor do gravador atraves 
de software, que passamos a descrever a seguir. 

O AUTOMATIZADOR DO CASSETE 

A intencSo seria projetar um circuito de custo reduado, 
utilizando o minimo de componentes e de fa'al aquisicfo, de 
modo a facilitar sua instalacSo dentro do micro. 

Com o auxilio de um multi'metro digital de boa precisao, 
comecei a pesquisar os niveis 16gicos de todos os integrados 
que complementam o processador Z80. Era preciso adotar um 
ponto de referencia que, nos comandos SAVE e LOAD, tives- 
sem um nivel contrano dos estados RUN, programacao e escri- 
ta. Por estado RUN entende-se quando o micro esta executan- 
do instrucOes do programa. Para experiences, podemos simu- 
lar o seguinte loop: 

10 FOR 1=1 TO 10000 

20 NEXT I 

RUN 

NEW LINE 



Na prdtica, eu nao consegui os niveis exatamente nas for- 
mas esperadas. Pore"m, obtive niveis pr6ximos do esperado no 
pino 10 IC 6 do micro, conforme mostra a figura 1 . 





PROGRAMAgAO 


RUN 


SAVE 


LOAD 


tensOes 


1,6V 


IV 


0,1V 


0,3V 


NiVEIS 


1 


1 









Figura 1 - Tensoes do pino 10 do IC 6 do TK82-C 

O passo seguinte foi a elaboracao do circuito que mterpre- 
tasse as tensOes do IC 6 da seguinte maneira: nivel para os 
comandos SAVE e LOAD e nivel 1 para os demais estados. 

Observando as representacOes graTicas das funcOes do circui- 
to na figura 2, notamos que abaixo de 0,8 V obtemos o nivel 
16gico e para as tensOes supenores um nivel 16gico 1 (*). Na 
ocasia"o da passagem de um programa para o cassete, o compor- 
tamento sera" como o mostrado no graTico da figura 3, que as- 
sume um nivel e, ap6s a gravac5o, retorna a seu estado ori- 
ginal. Caso semelhante ocorre na leitura de um programa, co- 
mo mostrado na figura 4. 

A figura 5 apresenta o graTico do micro quando em seu es- 
tado RUN (loop). Neste processo, a tensao cai de 1,6 V para 
1 V, mantendo-se pore*m no nivel 1 . nivel so sera interpre- 
tado pelo circuito com as tensOes abaixo de 0,8 V. O resultado 
destes niveis 6 obtido no pino 1 1 do integrado 7400 (veja es- 
quema da figura 6) e as tensoes sa"o obtidas no pino 10 do IC 6 
do micro. A montagem poderd ser feita na chapa de circuito 
impresso tipo padrSO ou mesmo numa confeccionada nas di- 
mensSes adequadas. 



* N. R.: Formalmente, o nivel Idgico 1 4 obtido com tensoes acima de 
2 V. Empiricamente , entretanto, o autor consegum este nivel com ten- 
soes entre 0,8 e 2V. 






VOLTS A 




Figura 2 - Nivel Idgico abaixo de 0,8 volts. 
volts 6 

o* 



°& 




Figura 3 - Modo SAVE: 0,1 volts, nivel Idgico 0. 




Figura 4 - Modo LOAD: 0J volts, nivel Idgico 0. 



VOLTS 




Figura 5 - Modo RUN: / volt, nivel Idgico 1 . 
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INVERSAO DE VIDEO E CASSETE AUTOMATICO 
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MICROS, 
VIDEOS, GAMES & CIA. 

Computadores: 

Polymax, Unitron, Prologica, 

Micro Digital, Sysdata. 



• OFERTA ESPECIAL • 

"MAXXI" 

Videos: Philco e Sharp 

Televisores Sanyo 



Video Games: Dynacon, 
Atari. 

OFERTA: Cartuchos para Atari 
a preco de custo. 
Suprimentos; Fitas, Disquetes, 
Formularios. 



• Super Oferta • 

Disquete Memorex 5 1/4- Cr$ 5.000,00 
CURSOS: Basic I, Basic II 

Inscrigoes Abertas 



Rua Estados Umdos, 2141 

Tel 852-8290 / 257-3852 / 231 -1 1 73 



Figura 6 - Lista de materials: 

• CI1 7400 

• Tl BC558ou similar 

• T2 BC 549 ou similar 



DleD2 1N914 
Rl 4K7x l/4w 
R2 1K5x l/4w 



R3 4K3x l/4w 
C14,7mFxl2V 
C2 2,2mFxl2V 
RL1 reli ZK02OO06 
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Figura 7 - Layout dos componentes do TK82-C, versdo antiga . 
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De 17a 23 

deoutubro 

a CompuShop 

temmais 

um endereco. 



Feira Internacional de Informatica. 

RUA M DE MICRO, N? 16-PARQUE ANHEMBI 

A III Feira Internacional de Informatica esta ai, e a CompuShop vai estar presente, com uma 
grande variedade de novidades em hardware e software. Isso e muito importante, mas nSo e o principal. 
Para a CompuShop , o mais importante e a sua filosofia de trabalho e de apoio ao 
cliente usuario de microcomputadores. 
Foi por isso que a CompuShop criou TotalWare - uma infra-estrutura que e ao mesmo tempo 
hardware e software, equipamento e oportunidade, servico e confiabilidade, programa e consulta, 
atendimento, treinamento e assistencia tecnica.E por isso que a CompuShop nao quer apenas vender 
microcomputadores e abandonar voce em seguida. Antes de mais nada, a CompuShop quer saber o 
porque da sua compra e se ela e realmente necessaria para as suas atividades ou para a sua empresa. 
Todos esses cuidados s3o tornados porque s6 assim a CompuShop pode orientar, esclarecer, 
fazer uma indicacSo correta e continuar dando assistencia " 
a voce, a sua empresa e ao seu equipamento. 
E essa e a unica maneira correta de voce comprar. 



G>mpuShop 




Loia 1 - Rua Dr. Mario Ferraz, 37 - CEP 01453 - S3o Paulo - SP - Tels.: (011) 210-0187/212-9004/815-0099 - Telex (01 1> 36611 BYTE BR 
Loja2- Av. Pres. Juscelino Kubitschek, 889 -CEP 04543 S3o Paulo -SP- Tels.: (011)64-2806/852-7149 

Estacionamento pr6prio.Abertas de segunda a sexta.das 9 as 19 horas.e aos sabados das 9 as 14 horas. 
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De acordo com o esquema da figura 6, observamos que o 
circuito possui tr6s pontos de ligacoes com o micro. Para maior 
facilidade de ldentificacSo destes pontos, a figura 7 apresenta 
um lay-out dos integrados no TK82-C. Para adaptacoes no NE- 
Z8000, nfo encontramos a numeracSo dos componentes no 
impresso. Entretanto, os integrados utilizados para as kgacoes 
estffo na mesma disposicfo no TK e desta forma o lay-out serve 
como orientacao para o incremento no NE-Z8000. 

Em alguns casos, principalmente quando operamos em 
FAST, o RL1 poderd pulsar a cada toque no teclado. Se isto 
ocorrer, coloque um capaator eletrolftico em paralelo com D2 
para provocar um pequeno retardo. Seu valor podera" ser expe- 
rimentado a partir de lOOmF, observando-se sua polaridade. 
rele" experimentado foi o ZK02006, com dois contatos reversf- 
veis: um utilizado para fechar o contato do motor do gravador 
atravds do plug REM e o outro ficando a cargo da criatividade 
de cada usudno. No meu caso, utilizei-o para ligacoes de LEDs 
que monitoram a interface do cassete, embora eles possam ain- 
da ser aproveitados para conectar aparelhos eldtricos simulta- 
neamente. 

Uma vez concluida a montagem da figura 6, podemos fazer 
um pre 1 -teste antes de ligd-lo ao micro, bastando ligar +5 V no 
pino 14 do CI 7400, +9 V no coletor do T2 e V a massa. Ca- 
so o leitor na"o consiga uma fonte com estas tensOes, podera' 
utilizi-las do pr6prio micro. 

Apos o circuito estar alimentado, podemos comprovar o seu 
funcionamento ligando o anodo do Dl ao terra. Neste mo- 
menta o RL1 deverd se energizar, retornando ao normal quan- 
do desligado. Agora s6 restaria fazer as interhgacOes definitivas 
no computador. Se porventura na"o funcionar, confira todas as 
ligacOes de acordo com o esquema, consultando ainda a tabela 
da figura 8, onde constam todas as tensoes do CI 7400 nos 
seus diversos estados de operaca"o. 

A INVERSAO DE VIDEO 

Talvez muitos usua'rios tenham sentido, como eu,a necessi- 
dade de se obter uma imagem do TK com fundo escuro e ca- 
racteres em branco. Ap6s um trabalho alongado na digitacao 
de programas ou mesmo nas suas execucoes, sentimos um can- 
saco visual decorrente da predominance branca no video, agra- 
vada pelas oscilacSes provenientes do pr6pno sincronismo da 
TV ou dos 60 Hz da rede ele'trica. 



PINOS 
CI 7400 


MODALI DADES 


PROGRAMA 


SAVE 


LOAD 


RUN 


1 e 2 


2V 


0,7V 


0,9V 


IV 


3, 4 e 5 


2V 


3,7V 


3,4V 


2,7V 


6 


1,4V 


OV 


0,2V 


0,9V 


7 


OV 


OV 


OV 


OV 


11 


OV 


7,4V 


7V 


0,5V 


12 


1,5V 


1V 


1,1V 


1,4V 


13 


1,5V 


IV 


i,iv 


1,4V 


14 


5V 


5V 


5V 


5V 



Figura 8 - Tabela de tens6es do CI 7400. 

A reversSo do video do TK82-C £ facilmente conseguida 
com uma pequena modificacffo no seu hardware, que permitird 
obter imagens em fundo preto ou branco, conforme desejar o 
usuirio. O unico componente utilizado 6 uma chave de tres po- 
los e duas posicoes. Para esta modificaca"o, basta identificar o 
IC 9 do micro, com auxilio da figura 9 e, no lado inferior do 
circuito impresso, com um estilete, fazer um pequeno corte de 
acordo com o desenho. Em seguida, soldar tres fios nos pontos 
indicados, interligando-os com a chave. 

£ recomenda'vel que as modificacOes sejam feitas com o mi- 
cro desligado e pelas diferencas do circuito impresso, elas nSo. 
poderSo ser utilizadas no NE-Z8000. 

Os dois incrementos que aqui descrevemos talvez tragam 
um novo horizonte de aplicativos para os usua'rios, dependen- 
do da pretensa"o de cada um. A combinaca"o do circuito auto- 
matizador do cassete com o software poderf trazer excelentes 
recursos, pnncipalmente em aplica?0es comerciais. 

A inversJo do video favorece o conforto do operador/pro- 
gramador, podendo-se ainda unitar o vfdeo de fosforo verde 
utilizando-se um acrflico verde na frente da tela, proporcio- 
nando um visual mais agradavel e facilitando os reflexos de luz 
incidente no video. 

Sergio Cwikla fez AdministragSo de Empresas na Faculdade de CiSncias 
Sociais e Aplicadas de Foz do Iguacu, Parana", e trabalha na Itaipu-Bina- 
cional, onde 6 responsa'vel pela manutencSo de equipamentos de co- 
rn unicacoes do Setor de Seguranca. 



ORIGINAL 




MODIFICADO 




cm. i 



Figura 9 - ModiflcacSo no impresso para a inversao de video. 
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Suprimentos Prodata .• 
uma boa impressaq do 

V«^^^^ I ^aJI ^#1 VI ¥%IVIw ^outubro/noveme 




© PTODAiA 

PRODUTOS PARA PROCESSAMENTO DE DADOS LTDA 

to/a Henrique Ongari. 103 CEP 05,038 Sao Paulo SP Teh. 262-0896/ 864-34 10 

representantes: 

Rio de Janeiro: /ones 253-3481 c 255-4188 / Belo Horizonte: fone 225-9871 

e 225-4235 / Cuririba: fones 263-3224. 262-8632 e 263-3256 ' Porto Alegre.fones 

26-6063 e 26-131 9 f Belem. fone 223-631 9 ! Recife: fone 227-2969 



OFERTASPARA 
.^OUTUBRO/NOV EMBRO 

Fit un para impiovsoias 
ELEBRA eP~:(> PROLOG l(\ 
CrS 2.000.00 * 18% I PI 

Fi.tas paia imprcssi»i;i^ 

DIOILAB 

CrS 3.%9.00- 18% IW 



•Fna> para ctriuchits 
CENTRONICS 52daDismac 

CrS : ! l >5.0() • l.v'blPI 

Fnas paia impressoras 
Matricial SYCOR EDISA 
Centronics 700 c IBM 
Silver Dolar: 
CrS 1.195.00+ 18% IPI 

•Fnas para impressoras 
detexto COBRA D50 

(Mylai ou Nvloni: 
CrS :. 4 20.00 ♦ 18% IPI 



»Fitas para impressoras 
de texio POLIMAX modclo 
Diablo Hytype 111 Mylar ou 
Nylon): 
CrS 5.3-W.OO* 18% IPI 



Fnas impressoras cm cartucho 

para todos os Micros. Minis e 
Prucessadores de Palavra. 

Fitas largas para impressoras 
grandes(IBM. Burrouglis. 
Cobra. Facom. Umvac. etc.). 
em nylon e mylar. 

Fnas para impressao do 
caracieres magnet icos CMC-7 
(Tandem-Cobra. H.Bull. 
Olivetti. Burrouglis. MDS.etc). 

Diskettes de 8" e 5 I /4" 
(densidade: simples e dupla). 

Confie na expenencia de 
8 anos de quern labrica 
suprimentos da mail alta 
qualidade. Exija Prodata. 



Registre os /ancamentos, atualize o saldo e, de quebra, 
administre melhor sua vida financeira em seu micro da linha TRS-80 



Controle suas 
operates bancarias 



Marcelo Renato Rodrigues 




Oexaustivo trabalho de consoli- 
daca"o de saldos bancanos atra- 
v£s de canhotos de talOes de 

cheques e extratos penddicos emitidos 
pelo banco leva os usuanos de micro- 
computadores a desenvolver programas 
que auxiliem na execucao desse service 
Encontram-se disponi'veis no merca- 
do vdrios programas com esta finalidade 
mas, via de regra, os programas mais uti- 
bzados sab simples e desenvolvidos pe- 
los pr6pnos usuarios. Por este motivo, 
eles estSo frequentemente aqudm das 
oferecidas pelos micro- 
computadores. Podemos acrescentar 
ainda o fato de que grande parte dos 
usuanos nSo dispoe de unidades de dis- 
co e impressora. 

Pensando nisso, foi desenvolvido um 
programa com alguma complexidade, o 
RFC - Registro Pessoal de Cheques, 
que, apesar de limitado por trabalhar 
com fita magnCtica (cassete), fornece 
produtos bastante uteis. A16m de regis- 
trar as operacOes e executar o acompa- 
nhamento do saldo, ele auxilia na ad- 
ministracao da vida financeira do usua- 
no, pois fornece os totals retirados e de- 
positados por categona ou finalidade, 
como educaclo, saiide, alimentacSo etc. 
Deste modo, uma consohdacSo anual 
pode ate" apoiar a elaboracSo da decla- 
racflo do Imposto de Renda. 

RPC foi desenvolvido no CP-500, 
com opcSo de uso de impressora Star/ 



Dismac ou equivalente, de 80 colunas, 
com utilizacJo de caracteres compn- 
midos. Consequentemente, este progra- 
ma roda tamtam em micros derivados 
da familia TRS-80 Modelos I e III, a 
saber: DGT-100, D-8000/1/2, CP-300, 
Naja, JR Sysdata e JP-01 . Para adaptiNo 
a outros equipamentos, sugerimos a lei- 
tura do artigo "Tres faces da mesma 
linguagem", de Orson V. GalvSo, publi- 
cado nos numeros 19 e 20 de MICRO 
SISTEMAS. 

FUNCIONAMENTO E OP<;0ES 

programa apresenta inicialmente o 
menu das rotinas possiveis: 

(1) AD I Cl ON AR LANCAMENTOS 

(2) CARREGAR LANCAMENTOS DA FITA 
<3) APRESENTAR LANCAMENTOS NA TELA 
<4) ALTERAR LANCAMENTO 

<5> IMPRIMIR PLANILHA 

(6) 6RAVAR LANCAMENTOS 

(7) FIM DO PROCESSAMENTO 

QUAL A ROTINA DESEJADA? 

A rotina (1), de introducSb de lan- 
^amentos, tanto inicia quanto acrescen- 
ta novos lancamentosaquelesjaexisten- 
tes, atrave's do carregamento dos dados 
contidos na fita magne"tica ou uitrodu- 
zidos pelo teclado. programa preve 
600 lancamentos, sendo que tal quanti- 
dade pode ser alterada em funcao da ca- 
pacidade do micro. Os valores em cru- 
zeiros sSo tratados com dupla precisa"o. 



embora nem sempre sejam editados com 
todos os seus algansmos significativos. 
lancamento 6 composto dos se- 
g unites dados: 

• numero do cheque - variavel alfanu- 
me"rica de 6 di'gitos; 

• mes -de 1 a 12; 

• dia - de 1 a 3 1 ; 

• descricao da transacao — variavel al- 
fanume'rica de 1 1 di'gitos; 

• codigo da transacao - digit o numd- 
nco de 1 a 9, que codifica a categoria ou 
finalidade da transacao, a saber: 

1 - alimentacflo; 

2 - moradia; 

3 — lazer; 

4 — educacao ; 

5 - saiide; 

6 - transportes; 

7 — servicos publicos; 

8 —outros; 

9 - depositos. 

• valor da transacao. 

Ap6s a introducfo do valor, o pro- 
grama possibilita a correcao de qualquer 
dado do lancamento (veja a figura 1). 
Note que o saldo anterior 6 solicitado 
apenas para a pnmeira utilizacSo ; nas uti- 
liza96es postenores este valor 6 obtido 
da fita magne'tica. 

A rotina (2) carrega os lancamentos 
da fita cassete. O conjunto desses lanca- 
mentos fica protegido por um rdtulo 
que e o nome do arquivo solicitado pelo 
programa. 
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A rotina (3) apresenta os lancamen- 
tos na tela. usuirio pode limitar esta 
apresentacao atrave's de datas de initio 
e fim (veja a figure 2). Observe tambe"m 
a apresentacao pelo programa dos va- 
lores das transacts totalizados por ca- 
tegona na figura 3. 

A rotina (4) permite alterar qualquer 
lancamento atrave's de uma s^rie de co- 
mandos que possibilitam avancar ou re- 
troceder (teclas t e 4- ), inserir, subs- 
tituir e eliminar qualquer lancamento 
desejado. 

A opca"o para impressfo 6 a rotina 
(5), que apresenta a planilha mostrada 
na figura 4. Nesta planilha, o valor de 
cada lancamento 6 impresso na coluna 
apropnada, sendo que na mesma linha, 
a ultima coluna mostra o saldo logo 
ap6s essa transacao. Nas duas ultimas li- 
nhas tem-se os totais por categoria e o 
percentual relativo ao total gasto, ou 
seja, a contribuica"o percentual da cate- 
goria para o gasto total. 

A rotina (6) possibilita a gravaca"o em 
fita magne'tica a partir do lancamento 
desejado e estabelecido pela sua data. 
Se for dada entrada, diretamente, com 
tecla ENTER ou equivalente em padra"o 
ASCII, o programa assume o primeiro 
lancamento existente no arquivo ante- 
rior como pnmeiro lancamento do novo 
arquivo. Este arquivo terd seu prbprio 
nome, forneado pelo usuano. 

A rotina (7) encerra o processamento. 
Por fim, recomendamos aqueles que 
s3o miciantes em programacSo, desen- 
volver o fluxograma a partir do progra- 
ma Registro Pessoal de Cheques, pois ele 
servira de modelo para a elaboracao de 
um sem-numero de programas gracas is 
suas solucoes logicas associadas as possi- 
bilidades do BASIC. 



Engenheiro Eletricista, formado pela Escola 
Polite'cnica da Universidade de SSo Paulo, em 
1968, Marcelo Renato Rodrigues tern vinos 
cursos na irea de Sistemas. Trabalha atual- 
mente na CESP — Companhia Energe"tica de 
Sa~o Paulo como Supervisor de Setor, respon- 
sive/ pelo desenvolvimento e implantaoSo de 
Sistemas Tdcnicos na Area de distribuicSo de 
energia el4trica. 
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INTRODUCAO DE LANCAMENTOS 
+**MENSAGEM>ULTIMO LANC. - ***DISPONIBILIDADE - 600 
>PARA SAIR DESTA ROTINA, ENTRE COM <*> NA LINHA <No. DO CHEQUE> 
>TECLE APENAS < ENTER > PARA MES OU DIA REPETIDO 



LANCAMENTO 1* 



MES LANC. ANT.— > 2 



DIA LANC. ANT.~> 3 



(1) No. DO CHEQUE— > ? 713511 

<2) MES— — — «« — > ? 2 

(3) DIA— -«««==««■> ? is 

(4) DESCRICAO— -=«> ? CONDOMINIO 
<5> COD I GO— — — > ? 2 

<6> VALOR««— --«-> ? 38000 



CORRECAO <S ou N)? 



LANC. ft 

1> 
2> 
3> 
4> 
3> 
6> 
7> 
8> 
9> 
10> 



APRESENTACAO DOS LANCAMENTOS 

A PARTIR DO DIA 3 / 1 ATE' DIA 13 / 
CHEQ * MES/DIA DESCRICAO COD VALOR 



422213 
432214 
422213 
OP 301 
452217 
452218 
452219 
711500 
711501 
711504 



1/ 3 
1/ 4 
1/ 7 
1/10 
1/17 
1/18 
1/19 
1/19 
1/23 
1/28 



SUPERMERC 

ALUGUEL 

CONDOMINIO 

SALARIO 

TELEFONE 

SEGURO AUTO 

DR. CARLOS 

RESTAURANTS 

DENTISTA 

CART.CRED. 



73.422 

180.726 

33,042 

200.710 

8.323 
45.000 
15.000 

7,800 
34.930 
18,000 



*MENSABEM>TECLE < ENTER > PARA CONTINUAR OU (*) PARA SAIR 



SALDO 

262,588 
81 , 862 
46.820 
247.530 
239.207 
194,207 
179,207 
171,407 
136,477 
118.477** 



TOTAIS POR CATEGORIA 
A PARTIR DO DIA 3 / 1 ATE' DIA 



15/2 



ALIMENTACAO 

MORADIA 

LAZER 

ESCOLA 

SAUDE 

TRANSPORTES 

SERV. PUBLICOS 

OUTROS 

DEPOSITOS 



VALOR 
81222 
253768 
30000 
O 

49930 
55000 
8323 
56000 
200710 
TOTAL GASTO 



PORCENTAGEM 
14.7 
45.8 
9 

9 

9.9 
1.5 
10.1 
36.2 
554243 



TOTAL DEPOSITADO 200710 
***MENSAGEM>TECLE < ENTER > PARA SAIR 



MMIO Mil 


KStAICM •• 


• •MM. 


M.MtM 


OCBUE fCS 111 SMUE/KP M.IICHTW 


lOMtlt 


<« 


SALH mi. 






427213 JAN 3 


SUftlKK 


73.422 




452211 itm 4 


ALUGUEL 




180.72* 


422215 JAN 7 


coNwmmo 




3.042 


V 301 m 10 


SALARIO 






452217 JAN 17 


TELEFW 






452211 JAN II 


SEGURO AUTO 






452211 JAN 19 


OR. CARLOS 






711500 JAN 14 


RESTAUIANTE 


7.BO0 




711501 JAN 23 


DENTISTA 






711504 JAN 21 


CART.CIEO. 






71150* FEV 2 


GAS0L1M 






711507 FEV 5 


ElfRESiM 






711501 FEV 3 


HOTEL CABO 






715311 FEV 15 


:*;::■:«;: 




38. MO 



ACDMPANHAMENTO DEI OPERACOES E>ANCARIAE 



•••VALOR DA OKRACAO IWCARIA TO CATESORiA'.".— — 

LAIEI EWCAC SAUDE TAANSWT SERV.hJlL OUTIOS KROSITDS 



15.000 



SALIO 

33A.0I0.I2 
2*2.511. 12 

81.1*2.12 
46.820.12 
247.330.12 
231.207.12 
194.207.12 
174. 217. 12 
171.407.12 
136.477.12 
118.477.12 
108.477.12 
70.477.12 
20.477.12 
-17.522.88 



TOTAL 

ronton AKA 



11.222 
14.7 



253.7*1 
45.1 



50.000 
4.0 



I 
0.0 



49.930 
9.0 



55.000 
1.9 



B.323 
1.5 



5*. 000 

10.1 



200.710 
36.2 



dB/ 




dB/MICRO 

AV. ALFONSO BOVERO 218 

SAO PAULO S.P. 

BRASIL 

TEL. (011)2630711 



HOTLINE dB/FONE 

PROGRAMA dB/I 

PROGRAMA dB/II 

JORNAL DO USUARIO dB/Qube 

TREINAMENTO BASICO dB/Treino B 

TREINAMENTO AVANQADO dB/Treino A 

TREINAMENTO EM DISCO dB/Treino D 

SEMINARIOS PARA EXECUTIVOS dB/seminarios 

APOIO A AUTORES INDEPENDENTES dB/Aplicativos 



SLPORTE 

TOTAL 

AOS 

LSUARIOS 
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CONTROLE SUAS OPERAgOES BANCARIAS 



Registro Pessoal de Cheques 



•|DX(I>lINPUT"(6> 



VM 



1 G0T017 

2 P*-INKEY*UFP*-""THEN2ELSEP-VAL(P*> -RETURN 

3 0*-INKEY*UF0*-""THEN3ELSE0-ASC(O*. iRETURN 

4 FORK-lTONLi IFAX-B1X (K ) ANDBX-B2X(K > THENL-Ki 0-1 1 RETURN 

3 NEXTKiPRlNTM*!"INEXISTE LANCAMENTO NESTA DATA-TECLE <EN 
TER > " » GOSUB3 1 RETURN 

6 PRINTS448.""! t INPUT" (1) No. DO CHEQUE— > "lA*(I> 

7 IFA*(I)-"*"THENP0KE16916.0iG0T020 

8 A*(I)-RIGHT*(A*(I>.6> 

9 BlX(I)-Ol INPUT"(2> MES— — — — — > "l BIX ( I > ■ IFB1X ( 
I > -OTHENB IX 1 1 > -BIX < I -1 ) 

10 82X< 1 > -Oi INPUT" <3> DIA-— — — — -> "I B2X< I ) « 1FB2X 
< I ) -OTHENB2X ( I ) -B2X < 1-1 ) 

11 INPUT-(4> DESCRICAO— -—> " IC*( 1 ) I C* ( 1 ) -LEFT* (C*( 
I). II) 

12 INPUT" (5) CODIQO— — — 
UOR-— - — -- ~ > -iB»(I) 

13 PRINT8960. "CORRECAO (S ou N)?"HGOSUB3 

14 IF0-83THENPRINT8960.STRING*<60.32> I IPRINT8832. ""I > INPU 
T"No. DA L1NHA.DAD0 CORRETO"! 1 1 »X»iGOSUBl 100IPRINT8832. ST 
RING* (60. 32) I i OOT013 

13 RETURN 

17 CLEAR12000iDEFINTI.J.K.L.NiML-600iNL-0iF*-"*.*«*.***"i 

h»- •• •»•••»»• . . *• - 

18 £•-"•••> "iM*«"**«M€NSAeEM>"iDIMP(9>lY*«"*«*.8" 

19 DIMA*<600> .81X(600) .B2X(600> .C*(600) . DX(600) .B4M600) .E 
•<600> .El*(9> .H*(12> 

20 CLSIPRINT89. "RPC VERSA0 2 - REGISTRO PESSOAL DE CHEOUE 
S" 

23 PRINT976."ESCRIT0 POR MARCELO RENATO RODRIGUES" 

30 PRINT37-33. " I 1 ) ADICIONAR LANCAMENTOS" 

33 PRINTS399."(2) CARREGAR LANCAMENTOS DA FITA" 

40 PRINT8463." (3) APRESENTAR LANCAMENTOS NA TELA'- 

43 PR1NTQ527."(4> ALTERAR LANCAMENTO" 

SO PRINT8391." (3) IMPRIMIR PLANILHA" 

S3 PR1NT9633."(6) GRAVAR LANCAMENTOS" 

60 PRINT8719."<7) FIM DO PROCESSAMENTO" 

63 PR I NT 9832. "DUAL A ROTINA DESEJADA"" t GOSUB2 

70 IFP<10RP>7THEN63 

73 IFP>2ANDP<7ANDNL-0THENPRINT8896.M»«"ESC0LHA INCOMPATIV 

EL-TENTE DE NOVO"lPRINT8832. STRING* (60. 32) l I GOSUB 1 500 « PR I 

NTS896. STRING* (60. 32) I > G0T063 

80 IFP>2ANDP<7THEN86 

83 CLSiONPGOTOlOO. 200. 300. 400.300.600.700 

86 B3-0UFP-6THENINPUT"MES DE INIC10-MESMA DATA DO ARC. A 
NT. TECLE <ENTER>"lB3iLI-liGOT08B 

87 INPUT-MES DE INICIO-MESMA DATA DO INICIO DA SESSAO TEC 
LE <ENTER>"IB3 

88 IFB3-0THENG0T092 

90 INPUT'DIA DE INICIO"! B4IAX-B3I BX-B4I GOSUB4I IF0O1THEN9 

OELSELI-L 

92 IFP-40RP-6THEN83 

94 BS-Oi INPUT-MES DE FIM-SE COINCIDE COM O ULTIMO LANCAME 

NTO. TECLE <ENTER>"lB5 

96 IFBS-0THENLF-NLIG0T085 

98 IHf»UT"DIA DE FIM"! 861 AX-B5I BX-B6I GOSUB4I IF0O1THENG0T0 
9BELSELF-L 

99 GOT083 

100 PRINT813. "INTRODUCAO DE LANCAMENTDS" 

103 PR1NTM*! "ULTIMO LANC. - "INLI" ***DISPONIBIL 1DADE - " 

IML-NL 

110 PRINT">PARA SAIR DESTA ROTINA. ENTRE COM (*> NA LINHA 

No. DO CHEQUE ;" 
113 PRINT" TECLE APENAS <ENTER> PARA MES OU DIA REPETIDO" 
■PRINTtPOKE16916.3 

120 IFNL-OTHENINPUT-SALDO ANTERIOR" I E* (0) 
123 LI-NL*! 

130 I«NL*liPRINT9320. "LANCAMENTO"! II" MES LANC. ANT.«« 

>"IB1X(I-1>I" DIA LANC. ANT.«->"lB2X(I-l> 

133 GOSUB6:NL-NL»ltCLStGOT013O 
200 PRINT»404.H*l"APERTE <PLAY> NO GRAVADOR"t INPUT "QUAL 

NOME DO AROUIVO-lQ* 
203 PRINTS404.N*! "PROCURANDO O ARQUIVO >»» " 1 0* 
210 INPUT»-1.A*.B1X.B2X.C*.DX.B.E«(0) 
213 IFA*<>Q*THEN210 

220 PRINT8404.M»l"CARREGAND0 ARQUIVO >>>>> "IQ* 
223 F0RI-1T0ML 

230 INPUT*-1.A*(I) .B1X(I) .B2X(I) .C*( I) ■ DX ( I > . B* < I > . E* ( I > 
233 IFA*(I)-"*"THEN240ELSENEXTI 

240 CLSIPRINT388. "LANCAMENTOS DISPONIVEIS NA MEMDRIA"iPRI 
NTiNL-I-I 

245 PRINT"No. DE LANCAMENTOS-" INLIPR1NT"SALD0-Cr»" II PRINT 
USINGF*lEH(NL> 

230 PRINT8704.M*l"TECLE <ENTER> PARA CONTINUAR" t GOSUB31 LI 
- 1 ■ GOT020 

300 G0SUB1200IPRINT813.-APRESENTACA0 DOS LANCAMENTOS" :PRI 
NT ■ GOSUB303I GOSUB310I 00T0313 

303 PRINTTAB(11)"A PARTIR DO DIA " IB2X(LI > i "/" > B1X(LI > I " 
ATE' DIA "IB2X(LF)I"/"IB1X(LF) I RETURN 

310 PRINT-LANC. * CHEQ • MES/DIA DESCRICAO COD VA 

LOR SALDO'lPRINTlRETURN 

315 POKE16916.5ILT-256 
320 FORI-LITOLF:LT-LT*64iGOSUBlO0O 

325 IFLT-896THENPRINTM*! "TECLE -ENTER; PARA CONTINUAR OU 
(•> PARA SAIR-HGOT0380 

330 NEXTHPRINT3960. "QUER A APRESENTACAO DOS TOTAIS POR C 
ATEGORIA (S ou N ) ? " I I G0SUB3 
335 IFO-78THENGOTC378 

340 POKE16916.0iCLSiPRINT»20. "TOTAIS POR CATEGORIA" t GOSUB 
305 
345 PRINT921*. "VALOR"! IPRINT9230. "PORCENTAGEM" 



350 PRINT"ALIMENTACAO":TAB(19)El«(l)lTAB(42)P(l) 
355 PRINT"M0RADIA"lTAB(19)El*(2)!TAB(42)P(2> 
360 PR1NT"LAZER"«TAB(19)E1»(3) ITAB(42)P(3> 
365 PRINT"ESC0LA"«TAB(19)E1*(4> iTAB(42)P(4> 

370 PRINT"SAUDE"lTAB(19)El»(5> ITAB(42)P(S> 

371 PRINT"TRANSPORTES"!TAB(19)El*<6> ITAB(42)P(6> 

372 PRINT-SERV. PUBLICOS" I TAB( 191E1H (7) l TAB(42)P(7> 

373 PRINT"OUTROS"iTAB(19)ElH(B)iTAB(42)P(8) 

374 PRINT"DEPOSIT0S"iTAB(19>El»<9> ITAB(42)P(9> 

375 PRINTTA8(20)"T0TAL GASTO"! TAB (36) TO* 

376 PRINTTAB(20)"T0TAL DEPOSITADO" ■ TAB (36>E1»(9) 

377 PRINT8980.H*I"TECLE ENTER> PARA SAIR"l«GOSUB3 

378 P0KE16916.0IG0T020 

380 GOSUBSi IF0-42THENG0T0378 

382 IF0O13THEN323 

384 CLSILT-256IGOT0330 

400 PRINTTAB(4>"<DESCE> AVANCAR LANCAMENTO" I TAB (35) "<SOBE 

> RETROCEDER LANCAMENTO" 

402 PRINTTAB(4)"(I)NSERIR"!TAB(35)"(S)UB8TITUIR 

404 PRINTTAB(4)"(D)ELETAR"ITAB(35)"(-) SAIR DA ROTINA" 

405 PRINTTAB(15)"TECLE SUA OPCAO" 

406 GOSUB310IPOKE16916.SI I-LHLT-320 
408 GOSUB 1000 

410 GOSUB3I IF0-42THENPOKE16916.OIGOT020 

415 lF0-10IFI<NLTHENI-I*llG0T0408iELSEPRINT9LT.N*l"0 ARQU 
IVO TERMINOU"iGOT0410 

420 IFO-911Fl>lTHENI-I-liSOT0408xELS£GOT0410 
425 IFO-73THEN4SO 

433 I F0-83THENG0SUB6 i CLS i G0T0408 
440 IF0<;68G0T0408 

445 F0RJ-IT0NL-HA*(J)-A*(J*1)»B1X(J)-B1X(J*1) !B2X(J>-B2X 
(J*l>lC*(J>-C*(J*l)iDX(J)-DX(J«l)iB*(J>-B*(J*l>iNEXTj!NL- 
NL-HG0T0410 

450 FDRJ-NLT0I*1STEP-HA*(J*1)-A*(J) I B1X( J*l > -BIX <J > iB2X( 
J*l)-B2X(J)iC»(J*l)-C*(J)«DX(J*l>-DX(J)«B1l(J*l)-B*(J)!NEX 
TJINL-NL*H I-I*l«G0SU86iCLSiGOTO410 

500 PRINT-INICIALIZE A 1MPRESSORA E TECLE <ENTER>" IG0SU63 
303 IFO<>13THEN30OELSELPRINTTAB(2O)-AC0MPANHAMENT0 DE OPE 
RACOES BANCARIAS" I LPR I NT 

310 LPR1NTCHR* ( 1 5) I GOSUB1 200i DATA" JAN" . "FEV" . "MAR" . " ABR" . 
"MAI"."JUN"."JUL". "AGO". "SET" . "OUT" . "NOV" . "DEZ"i FORK-1TD1 
2« READM* ( K ) t NEXTK! RESTORE 

513 LPRINT-NUMERO DATA DESCRICAO " I STRING* (23. 42) I "VA 
LOR DA OPERACAO BANCARIA POR CATEGORIA"! STRING* (24. 42) I TA 
B( 120) "SAL DO" 

520 LPR I NT "CHE QUE MES DIA SAQUE/DEP" I TAB (26) "ALIMENTAC" I T 
A8 (38) "MORADI A" I TAB (49) "LA2ER" i TAB (58) "EDUCAC" I TAB (68) "SA 
UDE"lTAB(76> " TRANSPORT " I TAB ( 86 ) "SERV. PUBL"i TAB(98> "OUTROS 
"ITAB(106) "DEPOSITOS" 

522 LPRINT" <<< "I TAB( 15) "SALDO ANT. "I TAB( 1 16) ""! :LPRINT 
US1N8H*IE*(LI-1> 

525 F0RJ-LIT0LFiLPRINTA*(J)lTAB(7)M*(BlX(J) > I TAB ( 1 1 > "" : : L 
PR1NTUSING"**"!B2X(J>: I LPRINTTAB ( 15>C* (J) I 
360 ONDX ( J ) G0T0361 . 362 . 363 , 564 . 565 . 566 . 367 . 568. 569 
561 LPRINTTAB(26)""!iBOT0370 

362 LPRINT TAB (36) ""HOOT 0370 

363 LPRINTTAB(46)""MG0T0370 
564 LPR1NTTAB(56) ""! 1QOT0570 
563 LPRINTTAB(66>""liG0T0370 
566 LPRINTTAB (76) ""I I GOTOS 70 
367 LPRINTTAB(B6)""I I8OT0370 

568 LPR1NTTAB(96)""! : G0T0370 

569 LPRINTTAB(106)""I 

570 LPRINTUSINGF*«B«(J)!iLPRINTTAB(116)""iiLPRINTUSINGH*l 
E»(J) 

575 NEXTJ!LPRINTSTRING*(130.45) 

580 LPRINTTAB(6) "TOTAL"! i KA- 161 FORK- 1 T09I KA-KA* 1 0: LPRINTT 

AB(KA)""! ILPRINTUSIN6F*!E1*(K) I t NEXTKILPRINT"" 

585 LPRINTTAB(4) "PORCENTAGEM" I iKA-20iF0RK-lT09iKA-KA*10lL 

PRINTTAB(KA) ""! I LPRINTUSINGY*! P (K) I I NEXTKl LPRINT"" 

590 GO6UB13O0iLPRINTCHR*(18>>G0T020 

600 G0SUB1200IPRINTM*! "TECLE <PLAYi E <RECORD> SIMULTANEA 

MENTE" 

60S INPUT-QUAL NOME-CODIGO QUE IDENTIFICARA' ARQUIVO" 

IA*(LI-1) 

610 IFLI-l-0THENBlX(0)-OiB2X(0)-0lC*(0)-"A"xDX(0)-HB«(0) 

-o 

615 FORI-LI-lTONHPRINT»-l.A*(I).BlX(I) . B2X ( I ) .C*(I).DX(I 

) . Btt ( I > . EN ( I > i NEXT I 

620 PRINT*- 1 . "*" . 0. 0. " A" . 0. 0. 01 G0T020 

700 END 

lOOO PRINT9LT. ""liPRINTUSINGE*! 1 1 « PRINTUSING"X X"lA*(I 

) IIPRINTUSING" IMI/"IB1X(I) I iPRINTUSING"** "lB2X(I)lsP 

RINTUSING"X X"lC*(I) I IPRINTUSING" ••"! DX( I ) I t PRI 

NTUSING" ««•«»«•. "IB«(I)1 iPRINTUSING" ••«**••• . " I E* ( I ) I 

I RETURN 

llOO ON I 1 GOTO 1105. 1110.1115. 11 20. 1125. 11 30 

1105 A*(I)-RIGHT*(X*.6) ! RETURN 

lllO B1X( I >-VAL(X*>! RETURN 

1115 B2X(I)-VAL(X*)iRETURN 

1120 C*(I)-LEFT*(X*. lDiRETURN 

1123 DV. (I )-VAL(X*>: RETURN 

1130 B*(I)-VAL(X*> IRETURN 

1200 F0RK-lT09iEl*(K)-0iNEXTKiTD*-OiT8»-0 

1203 FORII-LITONLi IFDX ( 1 1 ) -9THENE* 1 1 1 > -€•( 1 1-1 ) *B* ( 1 1 ) I GO 

T01210 

1 208 E* ( 1 1 ) -E* ( 1 1 - 1 ) -B* ( 1 1 ) I TB8-Te8»»» (II) 

1210 E1»(DX(II) )-El*(DX(II> )*B«(II)i»CXTII 

12J3 FORK-lT09iP(K)-INT(El*(K)/T8»-JOOO*.3)/10iNEXTK 

1220 RETURN 

1500 FORNN-lTO*OOiNEXTW«R£TUHN 
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micro NAJA foi desenvolvido utilizando os mais modemos padroes de arquitetura de Microcomputador, 

atingindo uma amp/a faixa, desde os computadores pessoais ate os utilizados em empresas 

de pequeno e medio porte. Uma de suas grandes vantagens e a sua versatilidade, ou seja, voce podera 

adquirilo na sua versao mais simples, podendo voce mesmo expandi-lo a medida de suas necessidades, 

a um baixo custo 



CARACTERI'STICAS TECNICAS 

• 48 K bytes de memoria RAM 

• 16K bytes de memoria ROM 

• Clock de 3,6MHz ou 2, 1 MHz comutado por Soft 

• Safda para impressora para/e/a 

• 6 conectores para expansao no proprio gabinete 

• Microprocessador Z-80A 

• Video de 16 linhas por 64 ou 32 colunas 

• Interface de cassete para 1.500 ou 500 BPS 

• Linguagem Basic na ROM do sistema 

• Software compat i vel com TRS-80 mod. Ill 

ACESSORIOS 

• Monitor de video de 12" verde profissional 

• In terface para 4 unidades de disco de51/4 " de dupla 

• Unidade de disco face simples ou dupla 

• Interface para 4 MHz de Clock 



HGORR 77TOE/7 COT; 

CP/fl 'CLOCKOESriHZ 
UMDRDE0EDISC0DE8" 

* VIDEO 'R CORES 
SMTETIZRDOR DE VOl 




-I p) MM ROM LTDA. 

Av. Contorno, 6048 - Savassi - Fone: 225-0644 
Telex (031)3074 KEMI BR Belo Horizonte-MG 



Se voce 6 livreiro, biblioteca'rio, gosta ou tern necessidade 
de lidar com muitos livros... Aqui vai uma dtima pedida ! 



Biblioteca no micro 



Regina Basilio 



Com este programa para o D-8001 e compatfveis sera" 
facil localizar um livro at raves do seu numero, ti'tulo 
ou assunto, arquivados antenormente na memona. 

Quando voce for procurar um determinado Ijvto no arquivo, 
basta digitar o seu nome ou o seu numero e todos os dados 
aparecerffo no video. Para terminar uma hstagem no video bas- 
ta escrever FIM no campo ENTRAR O NUMERO DO LIVRO. 

Podem ser armazenados ate" 50 livros de cada vez, em siste- 
mas com 16K de mem6ria. Em computadores com capacidades 
de 32K e 48K este numero pode ser ampliado para 100 ou 150 
livros. 

At raves dele, voce pode arquivar o ti'tulo e os dados que de- 
sejar a respeito de cada livro, em fitas cassete, que poderSo ser 
atuabzadas, a ere seen tan do -se novas informacoes quando neces- 
sano. 

Voce poderd tambe'm fazer listagens na impressora (figura 
1) de todos os livros arquivados e, no final, o computador lhe 
dara a quantidade exata e o valor total destes livros. 

Com o menu deste programa voce podera\ ainda, ter uma 
lista de livros de determinado assunto, bastando para isso es- 
crever o assunto que deseja e aparecera"o no video as obras ca- 
talogadas que tratam deste assunto escolhido. 

Enfim, com este programa voce vai manter os livros que de- 
sejar sob seu inteiro controle. 





RELATORID 30 INVENTARIG 


NO. DA PAGINA 1 


N. DO LIVRO 






TITULO: 




ALITOR: 






ASSUNTO: 




EDiTORA: 






EDICAO: 




N. CATALB: 


DATA CoflPRA: 





VALOR APROX.: 





N. DO LIVRO 






TITULO: 




AUTOR: 






ASSUNTO: 




EDITORA: 






EDICAO: 




N. CATAL6: 


DATA C0J1PRA: 





VALOR APROX. : 






Figura I - Exemplo de Hstagem de livros na impressora 



Regina Basilio 6 formada em Economia pela FundaoSo Alvares Pentea 
do (Sao Paulo). Fez cursos de programapSo BASIC e COBOL e possui 
um microcomputador D-8001, da Dismac, ha" um ano, do qua! desen- 
volve programas. 



Programa Invent&rio de Livros 

9 "10 REM • INVENTARIO DE LIVROS • 

20 REM * P/ D.B001 E COHPATIVEIS • 

30 REN « C0NFI6URACA0: 16 K RAN E IMPRESSORA • 

40 CLEAR 7000 

30 UN NI(50I,T$(50I,AU50),SI(50).P»(50),HI50).LII50I. 0(501. V(50l 

60 Hlt*-RELAT0RI0 DO INVENTARIO ':H2«*' NO. DA PAGINA ' 

70 TT«0:SS»0:L=0:P=0:N=30 

80 CLS:PRINTTABU0):'« • INVENTARIO DE LIVROS » •"SPRINT 

90 PRINTTABI20); '• • MENU • •*:PRINT 

100 PRINT 'PARA FAZER AROUIVO NA NENORIA 0I6ITE I* 

110 PRINT 'PROCURAR UN LIVRO PEL0 NUNER0 DI6ITE 2' 

120 PRINT 'PROCURAR UN LIVRO PEL0 TITULO DI6ITE 3' 

130 PRINT 'PROCURAR PEL0 ASSUNTO DIGIT! 4' 

140 PRINT 'LER ARQUIVO NA NENORIA DI6ITE 5' 

150 PRINT 'DAR VALOR DO INVENTARIO DI6ITE 6' 

160 PRINT 'FAZER LISTA PARA BRAVACAO D16ITE 7' 

170 PRINT 'PARA HUDAR UN ITEN NA NENORIA DI6ITE 8' 

1B0 PRINT 'LISTAR AROUIVO NA INPRESSORA DI6ITE 9* 

190 INPUT B: IF (IK 1) OR (0)9) THEN GOTO B0 

200 ON GOTO 210.400. 480.570. 660. 790. 890. 990. 1360: END 

210 FOR Ml TO N:IFV(K) <> NEXT K ELSE GOTO 220 

220 FOR J=r. TO N 

230 CLS: PRINT 'PARA TERHINAR UNA LISTAGEN, ESCREVA ( FIN)' 

240 PRINT '0 ULTIN0 NUNER0 FOI 'JWIJ-D.'INDICE-.J 

250 INPUT 'ENTRAR NUNER0 DO LIVRO , S»:IFM« , FIH , THE»380 

260 N$(J)«K« 

270 INPUT 'ENTRAR TITULO DO LIVRO 

280 INPUT 'ENTRAR AUTOR (SEN VIR6ULAS) 

290 INPUT 'ENTRAR ASSUNTO 

300 INPUT 'ENTRAR EDITORA h DATA 

310 INPUT 'ENTRAR EDICAO 

320 INPUT 'ENTRAR N. DO LIVRO CATAL06AD0 

330 INPUT 'ENTRAR DATA DA A8UISICA0 

340 INPUT 'ENTRAR VALOR APR0XINAD0/PRECQ 

350 INPUT 'C0RRET0? S/N';Z»:IFZ»»'N'60T0230 

360 PRINT 'RELATORIO < ■JNHJll'AROUIVADO '?: 

370 NEXTJ 

380 NI(J)«'Fir 

390 PRINT,'<FIH DO AROUIVO.... >':BOT0135O 

400 CLS 

410 INPUT 'ENTRAR N. DO LIVRO P/ PES0UISA (FIN P/ PARAR)": Nf 

420 IF IIM'FIH' 60T01350 






mi) 
mi) 
Mil 
PfUl 

IKJ) 
Lt(J) 

Mil 

V(J) 
FOR I=1T0200:NEXTI 
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430 F0RJ=1TQN 

440 IFN$(J):'FIN"PRINT'<FIH DA LISTAGEM. .. >• :60TD1350 

450 IFH*ON$lJ)NEXTJ 

460 60SUB1240 

470 S0TO410 

480 WlOJ 

490 INPUT 'ENTRAR TITULO P/ PESQUISA (FIN F/ FARARI": M 

500 IF rn='FIH'B0T0l35O 

510 FOR Mm 

520 X$=LEFTIIT$IJ),LEN(H«I) 

530 IF N*(J)='FIH'PRINT \FIM DA LISTAGEM >-:GO70l35C 

540 IF r»OXINEXTJELSE60SUBl24G 

530 W+lllFKM K=N 

560 B07O49C 

570 WlOS 

580 INPUT "ENTRAR ASSUNTO P/ PES0UISA (FIN P/ PARAR)'! HI 

590 IF H$="FIH'WT01350 

600 FOR MT0N 

610 XI«LEFT$(S«(J>.LEN(M$)> 

620 IF W(J)*'FIM'PRINT "(FIN DA LISTAGEM. .. >':GOT0135O 

630 IF »OX$NEXTJELSE60SUB1240 

640 (C=J*l: IFK>N K=N 

650 60T0580 

660 CLS:R£H • LER LISTA6EH NA MEHORIA * 

670 INPUT 'AfERTE ENTER BUANDO 6RAVAD0R ESTIVER PRONTO. 'Ill 

680 F0RJ*1 TO N 

690 INPUT •-1,N*(J),T$(J),AIIJ),S»(J),W(J),H(J).L»(J)»D<J).V(J) 

700 IF J=NTHEN W(J)«'FIH* 

710 60SUB1240 

720 IF V(J)=060T0750 

730 IF WtJIs'Fin'THENGOWSO 

740 NEXTJ 

750 PRINTM96,'ESPAC0 LIVRE ■ lIVtlMl 

760 PRINT'LISTAGEfl CARRE6ADA NA HEKORIA ' 

770 IF Pl=l PRINT'PRINTINB CONTINUAR...':BOT01400 

780 60T01350 

790 CLS:T«0:S»O 

BOO FORJM TO N 

810 IF V(J!=060T0850 

820 IF Nt(J)* , END'60T0860 

830 T»T+i:S»S*V(J) 

840 E0SUB1240 

850 NEXTJ 

860 PRINT 'TOTAL DE LIVROS DA LISTA * VTtPRINT 

870 PRINT 'VALOR TOTAL DOS LIVROS = »'iS:PRINT 

880 60T01350 

590 REH * AROUIVO DE DADOS EM CASSETE * 

900 CLS: INPUT'PREPARE CASSETE P/ BRAVACAO. OUANDO ESTIVER PRONTO. APERTE ENTER. 

910 FOR J'lTON 

920 IF V(J)=OTHEN WU^'FIH' 

930 CLS:PRINT 'COPIAR....N. DO LIVRO ';N«(J)i 

940 PRINT •-l,W(J),TUJ),A*(J).S$(J).Pt<J).I«lJ),L»<J),D(J),V(J) 
| 950 SOSUE 1240:PRINT 'REBISTRO COPIADO..."! 
[ 960 FORI=1T0250:NEXT1 
| 970 IFWUM'FIN" PRINT'LISTA DO TAPE COPIADA': GOT01350 

980 NEXTJ 

990 CLS:R£M • NUDANCA DE AL6UN ITEM NA MEMORIA * 

1000 INPUT 'ENTRAR NUHERO DO LIVRO A 3ER HUDADO. (Fill P/ PARAR) Mil 

1010 IF K**'EWGOT0135O 

1020 FORJ=1TQN:IFN$(J)=K$60TQ1050 

1030 IF Nt(J)>'FIM':PRINT'(N. DO LIVRO NAO ENCONTRADO. FIM DA LISTA.. ):BOT01000 



1040 NEXTJ 
1050 60SUB 1240 

1060 PRINT9650, 'P/ NUDAR I NO. DO LIVRO. ENTRAR I' 

1070 PRINT 'TITULO ENTRAR TVAUTOR ENTRAR A" 

1080 PRINT "ASSUNTO ENTRAR S", 'EDITORA ENTRAR P' 

1090 PRINT -EDICAO ENTRAR IVN. LIV. CATL6. . ENTRAR L" 

1100 PRINT 'DATA ENTRAR D", "VALOR ENTRAR V; 

1110 INPUT M 

1120 IF Z*='B" INPUT" ENTRAR NOVO NUHERO HUM) 

1130 IF Z»*'T" INPUT'ENTRAR NOVO TITULO MKJ) 

1140 IF Zt*'A' INPUT'ENTRAR NOVO AUT3R';AKJi 

1150 IF Z*='S' INPUT'ENTRAR NOVO ASSUNTO"; St (J) 

1160 IF Z*='P' INPUT'ENTRAR NOVA EDITORA";Pt(J) 

1170 IF Zt-'I' INPUT'ENTRAR NOVA ED1CA0MIIJ) 

1180 IF Z(='L" INPUT'ENTRAR NOVO N. DO LIVRO CATL6.';Lt(J) 

1190 IF Z*='D" INPUT'ENTRAR NOVA DATA';D(J) 

1200 IF Z**'V INPUT'ENTRAR NOVO VALOR';V(J) 

1210 80SUB1240 

1220 INPUT 'CORRETO? S/N".'Z»: IF ZI*'N' THEN 60T01050ELSEBOT01230 

1230 INPUT "NAIS HUDANCAS? S/M" ; Z»: IFZ^-S'THENGOTOIOSOELSEGOTOIOOO 

1240 CLS: 

1250 PRINT 'NO. DO LIVRO ';N$(J) 

1260 PRINT 'TITULO ";T«(Jl 

1270 PRINT 'AUTOR NAilJ) 

1280 PRINT "ASSUNTO ";S»(J) 

1290 PRINT 'EDITORA ';PUJ) 

1300 PRINT 'EDICAO MKJ) 

1310 PRINT 'N. DO LIVRO CATL6. "Hlill 

1320 PRINT 'DATA DA AOUISICAO ";D(J) 

1330 PRINT 'VALOR APROX. VVU) 

1340 PRINT: PR INT: RETURN 

1330 INPUT 'PARA VER MENU. APERTE ENTER.. t Z*:6OT080 

1360 REM • PRINT LISTING * 

1380 LPRINT CHRf(143);CNRI(141) 

1390 60SUB1530 

1400 FOR J-lTON 

1410 IF NtUla'FIH'iGOSUBUOOJLPRINT'TOTAL DE LIVROS* ■;TT5TIIB(25> , S 

1415 LPRINT'VALQR TOTAL = 'JSSiTABISOI'VALOR APROX. ■ VSS/TT 

1420 IF N»(J)»"FIH':LPRINT: LPRINT'FIM DO RELATORIO ':GOT0135O 

1430 LPRINT 'N. DO LIVRO *;NI(J);TAB(60)'TITUL0: MUJ) 

1440 LPRINT "AUTOR: ";M(J);TAB(60) 'ASSUNTO: *;St(J) 

1450 LPRINT 'EDITORA: ';P$(J);TAB(60) 'EDICAO: ■itttfl 

1460 LPRINT 'N. CATAL6: ";LI(J);TAB(30)'DATA COMPRA: ';DU);TAB(60)' 

1465 LPRINT 'VALOR APROX.: NVIJ)' 

1470 LPRINT 

1480 L»L*5 

1490 TT=TT*i:SS=SS*V(J) 
':Z» 1500 IF L>55 60SUB 1530 

1510 NEXTJ 

1520 60T0 1350 

1530 REN * CABECARIO • 

1540 L=0:P=P*1 

1550 IF P>1:LPR1NT CHRK1401 

1560 LPRINT TAB(40);HlfiH2<;P 

1570 LPRINT 

1580 l=l*: 

1590 RETURN 

1600 REM • LISTASEN ADICIONAL » 

1610 INPUT" TEH OUTRA FITA PARA IHPRIMR? B/i'lW 

1620 IF 1UT Pl=l:S0T0660 

1630 RETURN 




C.omputadores Ltda. 



A Rio Micro tern uma novidade para voce no Rio de Janeiro 

LOCAQAO DE MAQUINA 

* Aqui voce paga por tempo e utiliza nossos micros para programar. aprender. bnncar e jogar 

* Venda de. Micros, interfaces, penfencos. fitas. jogos. programas. supnmentos. iivros. revistas. etc. 

* Curso de basic Normal, noturno. e instrucao programada. onde o professor e o computador. 
Rua Visconde de Piraja. 330 loja 314 — R.J. (021) 521-4888 
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Usuirio do Apple: com a ajuda deste artigo voce podera ampliar o espaco util 
de discos formatados pelo DOS 3.3 e seus compatfveis 



Crie um espaco extra 
em seu disco 



Nelson Filho 



Q~| uantas vezes nos deparamos com o problema de falta 
de espaco em disco? Vanas, nSo? Principalmente 
quando dispomos de apenas um drive e temos que 
conviver com a macante troca de discos durante a execuc*a"o 
de um programa com grande volume de dados! E que tal seria 
se conseguissemos um espa90 extra em nossos discos? £ o que 
veremos a seguir, a partir de uma discussao sucinta sobre a es- 
trutura do disco formatado pelo DOS 3.3 e seus compativeis. 

Vamos comecar estudando a anatomia do disco. Sabemos 
que o disco e drvidido em 35 trilhas, cada qua] com 1 6 setores 
de 256 bytes. Deste total, o DOS reserva para si quatro trilhas: 
0, 1, 2 e 17. As tres primeiras guardam o propno DOS para ser 
carregado na mem6ria, enquanto que a trilha 1 7 e" destinada ao 
Catdlogo (Directory) e ao VTOC (Volume Table of Contents). 

O Catalogo mantdm como registro, entre outros, o nome, 
tipo e posic^o de cada arquivo, enquanto que o VTOC apresen- 
ta um mapa^Tracfe Bit Map), distinguindo quais setores estSo 
livres e quais esta"o ocupados. 

Neste mapa do VTOC, cada trilha e* representada por quatro 
bytes, dos quais apenas os dois primeiros sao significativos (os 
demais nSo sao usados). Estes dois bytes, com seus 16 bits,- re- 
presentam a situacfo dos 1 6 setores. Conforme o bit for igual 
a 1 du 0, o setor correspondente estara" livre ou ocupado, res- 
pectivamente. Assim 6 que, para as trilhas 0, 1, 2 e 17, seus 
bytes representatives serSo iguais a zero, indicando que toda a 
trilha esti ocupada, reservada, no caso, para o DOS. 

Agora vejamos: por que na"o utilizarmos as trilhas 1 e 2 para 
o nosso pr6prio arquivo? £ claro que assim perdemos o DOS, 
mas isso nem sempre significa um problema, uma vez que sem- 
pre poderemos instalar o sistema com um disco padrffo. Em 
compensacSo, ganhamos 8192 bytes (8Kb), o que muitas ve- 
zes pode ser mais util. Para isso, tudo que preasamos fazer e" 
alterar aqueles bytes significativos, no mapa do VTOC, perti- 
nentes &s trilhas 1 e 2, para o valor 255. Desta forma teremos, 
nos 1 6 bits referentes a cada uma das duas trilhas, o valor 1 , in- 
dicando que todos aqueles setores estSO livres. 



£ claro que esta operacao n5o deve ser feita para a trilha 1 7, 
por razOes 6bvias. O CataUogo e o VTOC sao imprescindiveis 
ao sistema e por isso mesmo nSo devem ser remanejados (a lo- 
cal izacao de ambos nessa trilha 6, ate* certo ponto, estrategica). 
No entanto, - e talvez vooSs ja" tenham pensado nisso - por 
que nao aproveitamos tambe'm a trilha 0? Aparentemente n3o 
ha problema, mas acontece que p DOS utihza o zero para in- 
dicar o fim do Catdlogo e dos Indices (Track/Sector List), o 
que inviabiliza o manuseio de dados na trilha sem outras 
modificacOes bem mais complexas na estrutura do sistema - 
nao significando. porem, que a trilha fique total mente inutil: 
ela pode ser usada para arquivo, desde que manuseada direta- 
mente por linguagem de maquina. 

A operacao, como vimos entSo, 6 muito simples. Se voce 
possui algum programa que lhe permita ler um setor do disco, 
edita-lo e devolvf-lo ao disco, voce pode fazer a alteracao. 
lendo o setor da trilha 17 - o VTOC. Li voce" vai encontrar 
o mapa de conteudo a partir do byte $38. Para livrar as tri- 
lhas 1 e 2 altere o valor dos bytes $3C, S3D, $40 e $41, que 
a esta altura devem conter zeros, para o valor 255 ($FF). 

Se voce nao dispOe deste recurso, apresentamos aqui um 
programa especifico que fara isso para voce, com a vantage m 
de apresentar uma rotina em linguagem de mdquina, a qual 
chamamos de NODRIVE (listagem 3), que iri residir no setor 
da trilha do seu disco. Assim, toda vez que o usuario, de- 
savisadamente, tentar instalar o DOS com o disco modificado, 
esta rotina sera" executada, desligando o drive, imprimindo a 
mensagem DOS FORA e in do para o BASIC. De qualquer for- 
ma, sugerimos que o leitor, apbs transformar um disco, rotu- 
le-o devidamente para evitar surpresas. 

DOSEXTRATOR 

O programa que acabamos de mencionar denomina-se DOS 
EXTRATOR (sugerindo que ele extrai o DOS) e foi desenvol- 
vido para o Apple II Plus com DOS 3.3 ou compativeis, com 
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no minimo 16Kb (listagem 1). Ele se utiliza, fundamental- 
mente, da sub-rotina RWTS (Read/Write Track/Sector) do 
DOS para ler o VTOC, altera-lo e regrava-lo. Para isto, uma pe- 
quena rotina em linguagem de maquina 6 criada na pagina 
$03, que permite o acesso a RWTS. Vejamos a seguir a descri- 
c§o detalhada do programa. 

1 . Linhas 10-20: diagrama o video e, atravdsda sub-rotina 410, 
ajusta os parametros miciais. 

2. Linhas 30-90: interroga a posica"o do disco-alvo ; se tiver um 
< RETURN > como resposta, entendera slot # 6 drive # 1 . 

3. Linhas 100-120: avisa o usuano para inserir o disco; depois 
disso, um < RETURN > fara" o programa prosseguir (qual- 
quer outra tecla interrompera' a execucSo). 

4. Linhas 130-140: seleciona slot e drive indicado. 

5. Linhas 150-160: via sub-rotina, le o VTOC, faz as alteracOes 
e as devolve ao disco. 

6. Linhas 170-180: instala NODRIVE no setor 0, tnlha 0. Na 
realidade, apenas a linha 180 faz este trabalho - a hnha 170 
foi colocada apenas por uma questSo de requinte. Ela le o 
setor 15, trilha 2 (que ate" enta"o s6 deve conter zeros), zerando 
assim todo o buffer para receber NODRTVE. Deste modo, ao 
final da operacao, o setor da tnlha estara" organizado, con- 
tendo apenas o programa, seguido de zeros. Nota: uma vez 
que a linha 170 € apenas uma questao de capncho, o leitor po- 
de dispensi-la se preferir, por exemplo, acelerar a execucffo do 
programa. 

7. Linhas 190-220: informa o fun da operacao; a partir dai, 
um < RETURN > fara o programa recome9ar (qualquer ou- 
tra tecla encerrard). 

8. Linhas 230-260: duas sub-rotinas que chamam RWTS, via 
768 ($300), para ler e escrever no disco. 

9. Linhas 270-290: sub-rotina para ler o teclado. 

10. Linhas 300-370: venfica e informa se houve algum erro na 
leitura ou gravacSO; se houver, imprime mensagem de erro e 
interrompe o programa. 

11. Linhas 400-440: sub-rotina que inicia a execucSo. Primei- 
ro, pesquisando na pa"gina$03o endereco da Lista de Para- 
metros para RWTS (Input/Output Control Block - IOB), que 
para 48Kb esti em 47080 ($B7E8). £ claro que aqui n6s po- 
den'amos ter construido nosso pr6prio IOB, mas optamos, no 
entanto, por utilizar o ja" residente. 

Uma vez encontrada a lista, linhas 410 e 420, os parametros 
sa"o definidos na linha 430. Em seguida, a pequena sub-rotina 
para chamar RWTS e" escrita na pagina $03, Unha 440. 

12. Linha 500: di o comprimento do programa, que i de 
1 835 bytes; se o leitor preferir dispensar as declaracOes do tipo 
REM, o programa ficani com 1374 bytes. 

OUTRA ALTERNATIVA 

O leitor tern ainda uma outra opcSo para ganhar espaco no 
disco, e desta vez sem perder o DOS. Dissemos antes que o 
DOS ocupa as trilhas 0, 1 e 2; no entanto, da trilha 2 ele so 
ocupa os primeiros cinco setores. Os demais sa"o vagos e nor- 
mal mente s6 contem zeros. Na"o obstante, o DOS reserva para 
si toda a trilha. Se livrarmos apenas estes 1 1 setores vagos, ga- 
nhamos 2816 bytes (2,75Kb), com a vantagem de nao perder- 
mos o DOS. 

A opera c5o i a mesma, ou seja, alterar o VTOC. So que ago- 
ra basta alterar o byte $40 para o valor 255 ($FF) e o $41 
para o valor 224 ($EO), os quais referem-se apenas a tnlha 2. 
DOS EXTRATOR pode fazer isso para voce. Para isso, retire as 
linhas 170, 180 e 460 do programa original e altere as linhas 
160 e 190 conforme a listagem 2 e... bom proveito! 



Nelson Filho dedica-se ao desenvolvimento a pesquisa de software bisi- 
co, prestando servicos de assessoria tticnica para virias empresas de In- 
forma'tica. Possui um Apple II Plus ha" dois anos. 
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NELSON FILHO I 

1983 I 

REN IIUtllllMlltlllMlllltll 

TEH : HOHE : POKE - 16348.0 

INVERSE : PRINT TAB! 151'DOS EITRATOR' SPCI 14): VTAI 5: PRINT TAN 16) *SELECIOMC- 

SPC( 16): NORNAL : EOSUI 410 
VTtt 3: CALL - 868: PRINT 'SLOT NLtlERO «>'; 

BET SL»:SL » VAL (SLU: IF (SL < 1 OR SI > 7) AND ASC ISLII < ) 13 THEM 40 
IF SI > THEN SI « 6 

HTAI 81: INVERSE : PRINT ■ SLOT l';SL: NORNAL 
VTAB 3: PRINT TA81 26)'(' DRIVE NURERO';: VTAI 3: HTM 23 
80 6ET DM:DR ■ VAL (DR«): IF (0* < I OR OR ) 2) AM ASC IIMI < ) 13 THEN K 
90 IF OR ' THEN OR « I 

100 CALL - 868: VTAI 3: HTAB 16: INVERSE : PRINT SPCI I6)'RRIVE l';DR 
110 VTAB 3: HTAB 9: NORMAL : PRINT MNSIRA DISCO E (RETURN)';: 60SUB 780 
120 HTAI 8: IF A < > 141 THEN PRINT ' ABORTADO ': VTAI 23: END 

REN SELECIONADO SLOT/DRIVE 

POKE 108 1 l.SL I 16: POKE 101 I 2,DR: PRINT ' ALTERANDO '; 

REH CORFU PRINCIPAL 

EOSUI 240: FOR I > 60 TO 64 STEP 4: POKE BUF ♦ 1,235: POKE IUF » I < 1,233: NEIT I: 
60SUI 260 

POKE IOB ♦ 5,15: POKE IOB I 4,2: 60SU8 240: POKE 108 ♦ 5,0 

FOR I • I TO 33: READ J: POKE BUF ♦ I, J: NEIT I: POKE 101 ♦ 4,0: 60SUI 260 
190 VTAI 5: HTAB 17: INVERSE : PRINT 'DOS FORA': NORMAL 
200 VTAI 3: HTAI 11: PRINT 'OUTRO DISCO (RETURN)'; 
210 60SUI 280: IF A ■ 141 THEN RESTORE : VTAI I: HTAI 1: GOTO 20 
220 HTAB 1: CALL - 868: VTAI 23: END 
230 REH LEHOO SETOR 

240 POKE IOB ♦ 12,1: CALL 768: EOSUI 310: RETURN 
250 REH GRAVANOO SETOR 

260 POKE IOB I 12,2: CALL 768: B0SUI 310: RETURN 
270 REH LE TECLADO 
280 A < PEEK ( - 16384): IF A ( 128 THEN 280 
290 POKE - 16368,0: RETURN 
300 REH VERIFICANOO ERRO 
310 ERR = PEEK (IOB ♦ 13): IF ERR < > 16 AND ERR < > 32 AND ERR < ) 64 AND ERR < > 

128 THEN POKE 101 I 13,0: RETURN 
320 VTAI 3: HTAI 1: CALL - 868: CALL - 198: VTAI 5: FLASH 
330 IF ERR • 16 THEN HTAI 13: PRINT 'DISCO PR0TEGID0' 
340 IF ERR • 32 THEN HTAB 15: MINT ■VOLURE EURO" 
350 IF ERR > 64 THEN HTAB 16: PRINT 'DRIVE ERRO' 
360 IF ERR ' 128 THEN HTAB 13: PRINT 'ERRO DE LEITURA' 
370 NORKAL : VTAB 23: END 
400 REH INICIALWANOO 

410 HVT * PEEK (996) ♦ PEEK (997) I 256:LVT » PEEK (9991 ♦ PEEK (1000I I 256 
420 108 « PEEK (LVTI ♦ PEEK (HVT) I 256: POKE IOB ♦ 8,0: POKE IOB I 9,16:BUF ' 4096 
430 POKE 106 * 3,0: POKE 101 • 4,17: POKE 101 • 5,0 
440 FOR I « TO 5: READ J: POKE 768 I I, J: NEIT I: RETURN 
450 DATA 32,227,3,76,217,3 
460 DATA 166,43,189,136,192,32,147,234,162,10,189,23,8,32,240,233,202,16,247,76,0,224,1 

93,210,207,198,160,211,207,196,133,141,141 
500 REH PR06RAHA CON 1835 DUES 



130 
140 
150 
160 

170 

180 



Listagem 2 



160 
190 



GOSUB 230: POKE BUF + 64,255: POKE BUF » 65,224: GOSUB 250 
VTAB 5: HTAB 15: INVERSE : PRINT ■♦ 2816 BYTES': NORMAL 



Listagem 3 



ORB »0801 



BOOTSLOT EOU 
HOTOROFF EOU 
COOT I 
9ETVID 
■MIC 



• 2B 
•COM 

EOU »FDFO 
EOU »FE93 
EOU «EOOO 



08011 
080 J l 
OMAl 
00O9I 

oeoBi 
oeoei 
oem 

OSI2I 
08141 



A6 2B 

BD SB CO 
20 93 FE 
A2 OA 
BO 17 06 
20 FO FD 
CO 
10 F7 

4c oo eo 



0BI7i CI D2 CF 

OBlAi C6 AO 03 

OBlDl CF C4 87 

08201 80 80 



LDX BO0T9LT 

LDA nOTOROFF.X 

JSR SETV1D 

LDX ••OA 

LDA •0817. « 

JSR COUT1 
OEX 

BPL AVISO 

JMP BASIC 

.-DOS FORA" 



|''tltnt« S!ot»16 
iDflvt oil 
iC«cr»»» no video 
|AJu«ta aalda p«ra o 
iVator para o Basic 

I Das! Igando 
I o Drlvi 
(Modo vldao 
■Escrava 
I o tax to 
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Com este programa, feito para micros da linha Sinclair, basta voce ter 
os dados para fazer projecdes de varia'veis futuras. 



Ajuste os dados 
e f aca previsoes 



Armando Oscar Cavanha Filho 
Maria Beatriz de Campos Cavanha 



01 programa Ajuste foi desenvolvido para aplicacSes que 
necessitem obter a melhor relacao entre duas vanaveis 
quaisquer. Com ele pode-se ainda fazer provisoes e 

projecSes de valores futuros de vanaveis dependentes em casos 
de series temporais, desde que sempre se tenha em mente que 
o result ado sera uma expectativa e, deste modo, devera ser usa- 
do com cautela. 

A melhor relacSo entre as vanaveis 6 obtida atrave's da equa- 
cSo de curva que mais se aproxime dos pontos dados. pro- 
grama preve seis opcOes para ajustar curvas a pontos dados, 
que s3o: (1) Linear, (2) Exponencial, (3) Logaritmica, (4) de 
Potinria, (5) Hiperb61ica e (6) ParabOlica (veja a figura 1). 

Sempre que possivel, procure compatibibzar as ordens de 
grandeza das vanaveis dependentes e independentes. Por exem- 
plo: se X vana de 10 a 100 e Y de 10.000 a 100.000, faca Y 
valer de 10 a 100, em milhares de Y. Isso perrrutira uma me- 
lhor visualizacSo grafica e poupara trabalho para o micro. 

COMO FUNCIONA 

Para exemphficar o funaonamento do programa Ajuste, va- 
mos a um exemplo. Suponha que voce seja um medico obste- 
tra que conhec^ os valores de Comprimento Cabeca-Nadega 
Fetal (CCNF) medidos em uma gestante em func^o do Tempo 
de Gestaca"o (TG): 



TG ( semanas) 1 6,5 


7,0 


7,5 


l,< 


8,5 


9,0 


9.5 


10 


10,5 


11 


11,5 


CCNF (mm) 1 8 


10 


14 


' 7 


22 


25 


31 


34 


42 


45 


51 



Digamos que, a partir destes dados, voce queira saber qual o 
prova"vel CCNF com 14 semanas de gestacffo (TG). O pnmeiro 
dado que voce tera que fornecer ao programa e o numero de 
pontos disponiveis, que no caso € 11. O programa lhe solici- 
tara\ entfo, as coordenadas dos pontos. Lembre-se de que 
quanto maior for o numero de pontos introduzidos maior sera" 



(1) Linear ^,\ 
Y= A+BX "^pft 




(3) Logarltmica,;,^**? 
Y= A+BLNX y:^^ 





Vi 



(5) Hiperbolico 
Y= 1/(A+BX) 




(6! 



Parabolico 
.2 



Y= A+BX+CX 




Figura 1 
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a representatividade da curva achada. programa apresentado 
est* dimensionado para 50 pares de coordenadas, pore"m este 
niimero podera" ser aumentado mudando-se os comandos das 
hnhasl70e 180. 

Introduza, entito, as coordenadas X e Y de cada ponto, da 
seguinte forma (observe que Y 6 o seu CCNF e X o seu TG): 

X(l) = 6,5 

Y(l) = 8 

X(2) = 7 



Quando for introduzida a ultima coordenada (no caso, 
Y(l 1) = 51), o micro miciara alguns calculos e logo a seguir lhe 
solicitard o c6digo de ajuste. 

Caso voce tenha duvida quanto ao tipo de ajuste a escolher, 
faca todos e depois opte pelo que fornecer melhor aproxi- 
maca"o, ou seja, aquele que tiver R 2 mais prbximo de 1. Mas 
nao se esqueca que quando se tratar de projecoes, voce dever4 
escolher o ajuste que tiver a evolucio que mais se identifique 
com o fenomeno real. Neste caso e" imprescindivel urn bom co- 
nheamento do problema em questao. 

Digitando 1 aparecerd no video o ajuste linear, sua equacio, 
seus parametros A e B e a proximacao R 2 =0,9880. micro 
lhe perguntara\ entffo, se voce quer outro ajuste com os mes- 
mos pontos, novos pontos ou interpolacao. Para continuar 
com os mesmos pontos, digite e va pedindo, atraves dos co- 
digos correspondentes, os ajustes que voce" deseja. 

Apos obter todos os valores de R 2 , voce vai observar que o 
mais prbximo de 1, no caso, 6 o parabblico, sendo portanto o 
melhor ajuste. 

Finalmente, para fazer a projeca"o, voce digita 2(interpola- 
9S0) e, enta"o, o micro lhe perguntara qual o TG para fornecer 
o CCNF correspondente. Digite 14 e ele lhe dara Y (o CCNF) 
= 84,24. 

OUTRO EXEMPLO 

Agora vamos supor que uma empresa necessite saber qual a 
projecSo de vendas de seu produto para o ano de 1984. Neste 
caso os dados senam : 



ANO 


75 


76 


77 


78 


79 


80 


81 


82 


Milhares 
de unida 
des ven- 
didas 


200 


310 


550 


490 


630 


720 


770 


810 



e durante o processamento voce conseguina os seguintes da- 
dos: 



AJUSTE 


EQUAQAO 


R 2 


Linear 


Y= -6187 + 86X 


0,9284 


Exponencial 


Y= 0,000288 x e °' 18X 


0,8408 


Logaritmico 


Y= -28923 + 6758LnX 


0,9326 


Potencia 


Y= 2,16 x X 14 ' 4 


0,8523 


Hiperbolico 


Y= 1/(0,037 - 0,00045X) 


0,7158 


Parabolico 


Y= -2348 + 69 X - 0,42 X 2 


0,1428 



Com base nos resultados de R 2 , sena escolhido o ajuste lo- 
garitmico, e a resposta para a probabilidade de vendas em 
1984 sena de 1020 mil unidades de seu produto. 

m 

m 
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PARA O SEU PROBLEMA, 
NOS TEMOSA SOLU<;AO! 




OUTRAS MARCAS. 

• TK85eTK83 

• JR. DA SYSDATA 

•APPLY 300 

• Aplicativos • Utilitarios 

• Perifericos # Acessdrios 

• LiteraturaTecnica 
• Jogos. 



SCHUMEC 

Profissional-Cientifico 

M 101/85 

• CPU 8085 (8 Bits) c/ 64Kb 
deRAM 

M 102/88 

• CPU 8088 (16 Bits) c/ 256 Kb 
deRAM 

Ate 4 Diskettes de 8" 
Ate 4 Discos Rifidos 

de 6 ou 12 Mb 
Sistema Muitiusudrio 

Ct'RSOS: 

Basic Basico. Basic 
Avancado. CPM/DOS 
e Assembler. 







DIGITUS 

Pessoal e 
Semi-Profissional 

Compativel c/ o TRS-80 

Sistema Modular 

CPM 

Alia Resoiucdo de Video 



DESPACHAMOS PARA TODO O BRAS1L 



i::i 



KALHAU ENGENHARIA LTDA. 
Praca Tiradentes. 10 s/402 
Tel.: (021) 252-2752 -R.J. 
Cep. 20.060 



& 



Kpislisn 



MICROCOMPUTADORES 



DGT-100 Cr$ 240.000, x 3 — Gratis 18 logos 
CP200 Cr« 110.000, x 2 — GrAtiS 6 jogos 
TK85 Cr$ 89.925. x 2 - Gratis 6 jogos 
TK82-C Crt 49.925, x 2 - Gratis 6 jogos 

amda: UNITRON Ap II, Mem 64 K. 
Joystick, Impressoras. etc 

(Pregos suieitos a moditicacoea) 



PROGRAMAS PRONTOS EM FITAS 



JOGOS 

• VISITA AO CAMINO 

i MIDWAY 

i PASSAGEM PARA 
O INFINITO * 2" DIMENSACT 

' 10 JOGOS • JORNADA I 

EXCITANTES ESTRELAS 

PARA IK E MUITO MAIS' 



NAS 



JOGOS: 

SCARFMAN 
PENETRATOR 
SUPERNOVA 
VIAGEM A VALKYRIA 
ASILO 1 
AVENTURAS 
DEFENSE COMMAND 
E MUITO MAIS' 



LEASING E CRttDITO DIRETO! 



LITERATURA 

i MICRO-SISTEMAS 
■ INTERFACE 
' JORNALTK-CP 
i IMPORTADOS 



+ CURSOS DE BASIC 

GRATIS 

NA COMPRA DE OUALQUER MICRO 



DESPACHAMOS PARA TODO O BRASIL! 



APLICATIVOS 

CONTROLE DE ESTOQUE 

CONTAS A PAGAPJRECEBER 

MALA DIRETA/CADASTRO 

FOLHA DE PAGAMENTO 

VIDEOCLUBES 

ESTATiSTICOS 

SOFTWARE SOB ENCOMENDA 



Rua da Lapa, 120 Gr. 505 
Rio de Janeiro - RJ 
Tel.: (021) 252-9057 



AJUSTE OS DADOS E FACA PREVISOES 



Ajuste 



L ET* S X L Y — 
V < M > 



B X L Y ♦ 



< LNX <M> > 





1 o 


REM 


" AJUSTE •• 






2 O 


PRINT "ESTE PROGRAM* FAZ O AJ 






USTE DE CURVAS 

S " 


A PONTOS DADO 




3 O 


F R I NT 






4 O 


C L E AR 






s o 


PRINT " 1 — LINEAR 


Y — A-*- B * X " 




* o 


PRINT " 2 - E X FONENC I AL Y_A-EXP< 






B » X 


> . A > O " 






7 O 


PRINT " 3 — LOG AR X TM I CO Y — A -t- B * L N 

X " • 




• o 


PRINT "4-FOTENCI 
. A > O " 


A V-A-X--B 




9 O 


PRINT •• 3 - H I P ERBOL I CO Y - 1 / < A -* B 






* X > • 








too 


PRINT " * - P ARABOL X CO Y - A ♦ B •• X ♦ 






C * X « « 2 •■ 






1 2 O 


PR I NT 






1 3 O 


PRINT "INTRODUZA O NUMERO DE 






PONTOS N" 






1 4 O 


I NFUT N 






ISO 


PR I NT 






1 A O 


PRINT "INTRODUZA AS COORDENA 






D A s 


.. x .. .. E .. .. v 


" " DOS PONTOS 






D I BPON I VE I 8 . NEBTA O R D E M E BE 






PARAOAS POR ENTER(NEW LINE > " 




1 7 O 


DIM 


X < 3 O > 






i e o 


DIM 


Y < 3 O > 






t 9 O 


FOR 


M — » TO N 






2 O O 


I NFUT X < I-I > 






2 1 O 


I NFUT Y < 11 > 






2 2 O 


IP X < r-t > < m O 


OR Y < I-I > < m 






O THEN GOTO 2 3 


O 




2 3 O 


NEXT M 






2 4 O 


G OTO 2 9 O 






2 3 O 


C LB 








2 * O 


P R I NT 






2 7 O 


PRINT ••FOI INTRODUZXDO X OU 






Y < . 


■O USE TRANSLACAO Y — Y ♦ K E 






/ OU 


X — X •*- K . R ET-ORNANOO A E Q U A C 






AO FINAL ACHADA 






2 a o 


GOTO 1 A O 






2 s> o 


L ET 


S X — O 






3 O O 


LET- 


S Y — O 






no 


LET 


a X L — O 






3 2 O 


LET 


Q Y L — O 






3 3 O 


L ET 


S X 2 — O 






3 4 O 


L ET 


S Y 2 — O 






3 5 O 


L ET 


S X L 2 — O 






3 6 O 


L ET 


S Y L 2 - O 






3 7 O 


LET 


S Y I m O 






3 O O 


L ET 


S X 3 — O 






3 9 O 


LET 


S Y 3 — O 






4 O O 


LET 


S X 4 — O 






4 1 O 


L ET 


S Y 4 — O 






4 2 O 


L ET 


S X Y — O 






4 3 O 


L ET 


S X 2 Y — O 






1 4 O 


L ET 


S X Y L — O 






4 S O 


L ET 


Q X L Y — O 






4 A O 


L ET 


SX L YL - O 






4 7 O 


LET 


SX Y I — O 






4 a o 


L ET 


S Y I 2 — O 






4 9 O 


FOR 


M — X TO N 






s o o 


LET 


B X — S X ♦ X 


< It > 




3 1 O 


L ET 


BY — BY ♦ Y 


< I-I > 




3 2 O 


L ET 


SXL - BXL ♦ 


LNX < M > 




3 3 O 


L ET 


SYL - BYE. ♦ 


LNY < I-I > 




3 4 O 


LET 

2 


SX2 m BX2 ♦ 


< X C M > > M M 




3 3 O 


L ET 

a 

L ET 


SY2 — SY2 •*- 


< Y < M > > * * 




SAO 


SXL2 - SXL2 


♦ < LNX <M ) > * 






< LNX 


< ri > > 






3 7 O 


LET 
< LNY 


SYL2 - BYL2 
< M > > 


♦ < LNY < 11 > > » 




3 S O 


L ET 


SYI — SYI ♦ 


1 / Y < 11 > 




3 9 O 


L ET 

3 

L ET 

S 

L ET 

M 


3X3 - 8X3 ♦ 


< x < m > > - m 




A O O 


BY3 — SY3 ♦ 


<Y<I1>> » >» 




A X O 


SX4 - SX4 ♦ 


< x < r-i > > * - 




A 2 O 


L ET 

4 


SY4 — BY4 t- 


< Y < M > > • » 




6 3 O 


L ET 

* 


BXY — SXY ♦ 


< X < M > > * Y < M 




« 4 O 


L ET 

* 2 


SX2Y - BX2Y 
> « Y < M > 


♦ < < X < M > ) «» 




« 3 O 


L ST 
X < I-I > 


SXYL - BXYL 


♦ < LNY < M > > * 



A 7 O 

a a o 



7 O O 

7 1 O 

7 2 O 

7 3 O 

7 4 O 

7 3 O 

7 A O 

7 7 O 

7 O O 

MOO 

a i o 

a 2 o 



a s o 

a a o 



L ET SXL 
• < LNY 

L ET SXY 
*> X < II > 

L ET SYI 

m m a 

NE XT 11 
PR I NT- 
PR I NT " 

DO AJU 
I NPUT C 
X F CO m 
X F CO — 
X F CO — 
X F CO — 
I F CO — 
X F CO m 

STOP 

L ET A — 
> / < N 

L ET- B — 

< N « S X 
L ET - R 2 

< < S Y > * 

< < B Y > * 
C L S 

P R I NT 



Y L — 

< II > > 

X m 



SXLYL ♦ <LNX<M>> 
IX Y I ♦ <1 / Y < M > > 
> Y I 2 ♦ <I / Y < M > > 



I NTR 
BTE •• 
O 

1 T 



ODU Z A 



COD X GO 



HEN GOTO 820 

2 THEN GOTO 9BO 

3 THEN GOTO lOBO 

4 THEN GOTO I 1 70 
3 THEN GOTO 1 2 7 O 
A THEN GOTO 1470 

< BY •» SX2 - SX « SXY 
* SX2 - <SX> * » 2 > 

<N * SXY - SX * BY > 

2 — <SX> * * 2> 

- < A * BY ♦ B * SXY - 

* 2> / N> / <SY2 — 

* 2 > / N > 



XT 3.7; "AJUSTE 



L 1NEAR 



870 PRINT AT 4 . 7 ; •• Y- A* B - X ■• 
8 a O PR I NT AT 3 . 7 ; •• A— •• ; A 

8 9 O PR I NT AT A.7.-B--.B 
700 PRINT AT 9 , T t "R2-" ;R2 

VIO PRINT AT I 3, O; -PARA OUTRO A 
JUSTE COM OS MESMOS PONTOS D 
XGITE O ; PARA USAR NOVOB PON 
TOS DIGITE 1 i PARA I NT E R P O L A 
R DXGXTE 2" 

V20 INPUT MO 

9 3 O C L 8 

V40 IF MO - O THEN GOTO 720 
VSO IF MO - 1 THEN GOTO 40 
*AO IF MO - 2 THEN GOTO 17 00 
9 7 O GOTO 2 O 

9BO LET AL - <SYL - 8X2 - BX «■ 8 

XYL> / <N * 8X2 - <8X> « - 
2 > 
»»0 LET B m <N » BXYL - BX " SYL 

—^ > / <N* 8X2 - <8X> «■ * 2> 
lOOO LET R2 - <AL « SYL ♦ B » SX 

V *. - <SYL * SYL> / N> / (SYL 
2 - C3YL * SYL> / N> 
XOIO LET A ^ EXP AL 
1 O 2 O C LS 
1030 PRINT AT 3. 7 : "AJUSTE EXPON 

ENC I A L •• 
1040 PRINT AT 4 . 7 ; " Y - A * E X F <B*X 

> " 
lOSO PRINT AT 3.7;"A-";A 
1 O A O PR X NT AT * . 7 . •• B- •• ; B 

1 O 7 O GOTO 9 O O 
lOSO LET A — < BY » SXL2 - SXL •> 

8XLY> / <N « 8XL2 _ SXL * SX 

L > 
lOVO LET B — <N * 8XLY - 8XL * B 

Y> / <N * 8XL2 _ SXL * SXL) 
IlOO LET R2 — <A " BY ♦ B * BXLY 
- <<8Y> » * 2> / N> / <SY2 
< < BY > - * 2 > / N > 
1 1 1 O C L 3 
1120 PRINT AT 3. 7; "AJUSTE LOGAR 

X TM I CO " 
1 I 3 O PR X NT AT 4,7;"Y-A-*-B*LN X" 
1 I 4 O P R I NT AT 3 . 7 ; " A - " ; A 
1 I 3 O PR I NT AT 6,7;"B-".B 
1 X A O GOTO 9 O O 
X X ■? O LET" AL <m <SYL * 8XL2 — SXL 

SXLYL) / <N * SXL2 - SXL «■ 8 

X L > 
1IOO LET B - <N ■ SXLYL - SXL * 

SYL> / <N - SXL2 - SXL * SXL 

> 
II»0 LET R2 - <AL * SYL ♦ B * SX 

LYL - <8YL * SYL) / N> / <SY 

X-2 — <8YL « 8YL> / N> 
1200 LET A m EXP AL 

I 2 I O C L S 
1220 PRINT AT 3. 7; "AJUSTE POTEN 

CIA" 
1 2 3 O PR I NT AT 4.7;"Y-A*X«*B" 

1 2 4 O PR I NT AT 3.7;"A-"iA 

1 2 3 O P R I NT AT 6,7;"B—";B 



M 



M 



PROCURE QUEM 
REALMENTE ENTENDE. 



J^MICROMAQ 



R. Sete de Setembro, 92 - Lj. 106 
Tel.: 222-6088 - Rio de Janeiro 



POR QUE NAO TUDO EM 
UM SO LUGAR? 

Microcomputadores, Sotware, Publica<,6es 
Kspecializadas, Cursos e Manuten^ao de tquipamentos. 
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1 2 A O GOTO V O O 

1270 LET A - CSYI * SX2 - SX * S 

XVX> / < N * 3X2 - <SX> * * 

2 > 

1200 LET B - <N * SXVI - SX « SV 

I> / < N * SX2 - < 3 X > «■ * 2> 

* SXY 



1 2 9 O 



LET R2 « <A * SV I ♦ 
I _ <<SYI> * « 2> / M > ' <s 

YI2 — < < S Y I > « * 2> / N > 

i 3 O O C L 3 

1 3 1 O PR I NT AT 3.7;"AJU3TE H I P ER 

BO L X CO " 

1 3 2 O PR X NT AT 4.7;"Y-l/<A-t-B*X>" 

1 3 3 O PR I NT AT 3. 7; "A— " ; A 

1 3 4 O P R I NT AT A . 7 : " B — •• i B 

1 3 S O GOTO 9 O O 

1 4 7 O LET D — N * <SX2 * 3X1 — <S 

X3> * * 2> - SX * CSX * SX 4 

- 3X3 « SX2> ♦ SX2 * < S X * 
3X3 — <SX2> * * 2 > 

1480 LET DA - SY * <3X2 * SX* — 
<8X3> * « 2> - SXY * CSX * 
3X1 — 3X3 * SX2> ♦ SX2Y * <3 
X * SX3 — <SX2> " * 2> 

1 4 9 O LET DB — N * < S X Y * 3X1 — S 
X2Y * SX3> - SX * <SY * 3X4 • 
SX2Y * SX2> -»• 3X2 «■ <SY * SX 
3 - SXY * 3X2> 

1SOO LET DC — IM * <SX2 * SX2Y — 

3X3 «• SXY> - SX - CSX * SX2Y 

- 3X3 * SY > ♦ SX2 * < SX * 3 
XY — SX2 * SY> 

1310 LET A — DA / D 

1S20 LET B - DB / D 

1330 LET C — DC / D 

1S40 LET YM — SY / N 

1SSO LET VY — O 

1360 LEI* VYE — O 

1 3 7 O FOR I-I - 1 TO IM 

X3SO LET VY — VY ■- < Y < I-I > - YM> ■» 

< Y < It > - YM> 
1390 LET VYE - VYE ♦ <<A ♦ B • X 

«M> ♦ C «• < X < M > > * < X < M > > > — 

YM> * <<A * B * X<M> ♦ C «» < 

X<M>> * < X < M > > > - YM > 
1 <S O O NEXT I-I ».«., 

lAlO LET R2 - SQR <VYE / VY> 



1 A 2 O 


C L S 










1 A 3 O 


P R I NT AT 
OL I CO" 


3 


. 7 ; " 


A JUSTE 


P AR A B 


1 «s 4 o 


PR X NT AT 

« a •• 


1 


. 7 ; " 


Y - A ■*- B * 


X -»-C * X " 


l 6 3 O 


PR I NT AT 


3 


. 7 ; " 


A- •• ; A 




1 A A O 


PR X NT AT 


A 


» 7 i •• 


a - •• ; B 




1 « 7 O 


PR I NT AT 


V 


. 7 ; " 


C— " ; C 




i a a o 


GOTO 9 O O 










1 7 O O 


C L 8 










1 7 1 O 


LET XI-IA X — 




X < 1 > 






1 7 2 O 


LET YMAX — 




Y < 1 > 






1 7 3 O 


L ET XI-I X IM — 




X ( 1 > 






1 7 4 O 


L ET YM X IM — 




Y < 1 > 






1 7 3 O 


FOR M — 1 


TO N 






1 7 A O 


I F XMAX < 
AX - X < M > 


X 


< M > 


THEN 


L ET XM 


1 7 a O 


I F YI-IA X < 
AX - Y < M > 


Y 


< M > 


THEN 


L ET YM 


1 7 9 O 


X r- XM IN > 
IN - X < M > 


X 


< M > 


THEN 


L ET XM 


17 9 3 


I F YM IN > 
IN m Y < M > 


V 


< M > 


THEN 


L ET YM 


1 8 O O 


NEXT M 










1 S 1 O 


P IX I NT AT 


3 


. 7 ; ' 


XMA X — " 


, XMAX 


1 O 2 O 


P R I NT AT 


4 


. 7 . ■ 


YMAX — " 


, YMAX 


1 a 3 O 


P R I NT AT 


3 


. 7 : • 


X M I N — " 


; XM I N 


x a * o 


PR I NT AT 


6 


. 7 ; • 


YM X N— " 


; YM X N 


1 a s o 


PR I NT AT 


<> 


. O ; • 


INTRODUZA O 




V A LOR D E * 


X 


•• •• E O MICRO CAL 




CULARA Y— F< 


X 


> •• 






i a a o 


X NFUT I X 










l a 7 o 


I F CO — 1 


THEN 


GOTO 


1 9 3 O 


x a a o 


X F CO — 2 


TM EN 


GOTO 


1 9 a O 


i a 9 o 


I F CO — 3 


THEN 


GOTO 


2 O 1 O 


1 9 o o 


X F CO — 4 


TH EN 


GOTO 


2 O 1 O 


1 9 1 o 


X F CO — 3 


THEN 


GOTO 


2 O 7 O 


1 9 3 O 


IF CO - A 


TM EN 


GOTO 


2 1 3 O 


1 9 4 O 


STOP 










1 9 5 O 


L ET Y — A 


■*■ 


B * IX 




X 9 7 O 


GOTO 2 1 4 O 










i 9 a o 


LET Y — A 


* 


EXP C E 


I X > 


2 O O O 


GOTO 2 1 4 O 










2 O 1 O 


LET Y — A 


-•■ 


B * LN 




2 O 2 O 


GOTO 2 1 4 O 










2 O 4 O 


L ET Y — A 


*> 


X X 


* * B 


2 O A O 


GOTO 2 1 4 O 










2 O 7 O 


L ET Y - 1 


/ 


< A 


♦ B " 


I X > 


2 O 9 O 


GOTO 2 1 4 O 










2 1 3 O 


L ET Y - A 


■•■ 


B * IX* 


C * IX 




* » 2 










2 1 4 O 


PR X NT AT 
X - •• , I X 

GOTO 9 1 O 


1 


I . o 


•• Y — " ; Y ; " P A RA 


2 1 3 O 








/». 



Armando Oscar Cavanha Filho 4 Engenheiro Maoinico formado pela 
Universidade Federal do Parana" a Maria Beatriz da Campos Cavanha 4 
MSdica formada pata Faculdada EvangeTica da Medicina do Parana'. 
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CHEGA 

DE 
PROBLEMAS 

Use Tig Loader % 



f 



APE N AS: CR$ 15.000.00 



TIG-LOADER possibilita: 

• a localizacao do dtimo volume do gravador, 
(acilitando a operapao LOAD. 

• DUPLICAR qualquer programa, mesmo aque 
les "fechados". 

• carregar (LOAD) e DUPLICAR simultanea 
mente. 

• gravar (SAVE) em 2 gravadores ao mesmo 
tempo. 

• monitorar as operagSes LOAD. SAVE ou 
DUPLICACAO atraves de fone. 

• filtrar as interferencias eletricas de baixa 
frequencia. que sao a causa da maioria 
dos problemas de LOAD/SAVE. 



APLICATIVOS PARA TK E CP 200 

TIG SCREEN: vinte e sete rotinas de video, para incrementar seus programas' 
Inversao de video, moldura. arquivo de imagens, rotacao, scroll em quatro 
direcdes. etc... efeitos visuais incnveis' Em linguagem de miquina. ocupa 
1,3Kb. ficando protegido no RAMTOP, depots e so utiliza lo onde quizer' 
P/16K Com manual explicativo Cr$ 8 000,00 

TIG-COMP: coloque. em seus programas em BASIC, a velocidade de 

codigo de maquina. Rodeos na forma COMPILADA! Simples de usar, 

e $6 carregar ou digitar o seu programa em BASIC e depois usar 

o TIG-COMP. Pronto! Voce tera o seu programa em linguagem de maquina em 

instantes. 

p/ 16K Com manual explicativo Cr$ 15.000.00 

TIG SPEED: uma combinacao de soft e hardware, permitindo uma transferencia 
de dados micro/cassete de 4.200 bauds. Voce podera carregar ou gravar 
16 Kb em 30 segundos! Acrescenta ao micro a funcao VERIFY. Facilimo de 
operar, compSe se de cassete. interface e manual explicativo. 
P/16e48K Preco sob consulta. 



Envie seu pedido • cheque nominal cruzado 
Prazo de entrega: 15dias 

Despesas postais incluidas nos precos 

AtetxUmo* >om«nt« por c»rt« 



^fj»*f TIGRE COM. DE EQUIP. 91 COMPUTADORES LTDA. 
l'<" "))\ Rua Correia Galvao. 224 
ilj^i CEP 01547 Sao Paulo SP 




COMERCIO E SERVICOS LTDA. 



Suprimentos para escritdrio e processamento de 
dados 

Comercializapao e assistencia tecnica a Micro 
Computadores e equipamentos de escrit6rio 
em geral 

Revendedor autorizado: 

HP. , IBM. , SHARP 

PROLOGICA 



AihL 



m 



SSo Paulo: 

Rua Dr. Fernandas Coelho, 64 
Fone: (011) 211.9202 / 814.5500 
Telex: (011) 35.763 



Nesta partida de futebol voce sera o tScnico, o at/eta, o torcedor e o 
arbitro... voce sd nao podera hostilizar o juizW ! 



Futebol ao som do micro 



Antonio Macchi Junior 



N 



este divertido jogo de futebol, 
para os equipamentos compati- 
veis com o TRS-80 Modelos I e 
III, voce e" o te'cruco que escala o time e 
determina os tempos do jogo. Depois 6 
o atleta, mostrando toda a sua habilida- 
de em campo e, a cada gol, voce i o ln- 
flamado torcedor, em plena arquiban- 
cada do estddio, animado pelo som do 
micro. Os turnos se sucedem automati- 
camente e, ao fim, a tela sera" o placar 
eletronico mostrando o escore final da 
partida. 

Atravds da sub-rotina 6000 o progra- 
ma utiliza um recurso de sononzacao, 
isto e\ a cada gol, esta sub-rotina aciona 
durante alguns segundos o gravador para 
a entrada de uma mensagemsonora.Esta 
mensagem deve ser gravada em cassete 
an.tenormente e ter a duracSo do mterva- 
lo (de segundos) que voce fixar na sub- 
rotina 6000. 

Uma sugestfo para gravaca"o de men- 
sagem i voce aproveitar a transrrussao 
de uma partida de futebol pelo radio e 
gravar o gnto de gol do speaker com 
aquele traditional barulho da torcida. 



Antonio Macchi Jr. 6 formado em Adminis- 
tracSo de Empresas pela Universidade Federal 
do Rio Grande do Sul. Desde 1980 utiliza um 
TRS-80, desenvolvendo programas aplicativos 
e jogos. 





Futebol AutomiUco 




CLS:PRINT@206, 


»* f + f f f f * :+ t f .+. f + 


f * + * 


1 PRINTG270, "* 


riJTEEOL AUTOMATICC - COM SOM 


2 PRINTt334. "* 






3 PRINT«3?e. "* 


Per A. Macchi Jr. & Macchi III 


4 PRINTQ462, "* 


SALVADOR - Ea - BRAS I L - 


ABR/31 


5 PRINT@526, "* 


TELEFONE: (071) 24313S7 


6 PRINTG59C, "* 

* » 

7 CLEAR 200 

10 PRINTS723, ""; : 
NT 1 787, " , '; : INPUT' 
15 CLS 

30 PRINT@20,CHR$ 
$(133) :PRINT@399, 

TIME ";k 
50 CLS:PRINT@S32, 
GRAVADOR - FRESS] 
60 PRINTS404, ""; : 
70 T1=0 

1 


+: 4 * * lf| S|C +: ;+. :+. :+. :+. :+. * * 


* * 4 f 


INPUT "NOME DC TIME NUMERO 1" ;J$:PRI 
NOME DO TIME NUMERO 2" ?G$ 

157)5" - "J$5" x "5G$;" = ";CHR 
"";: INPUT "QUANT03 J0GAD0RE3 EM CADA 

STRING* (62, 140) : PRINT@396, "FITA NO 
ONE <pU/> - DESLIGUE SAIDA <EAR>" 
INPUT"QUANTOS TURNOS DESEJA " ; T2 



120 
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100 
110 
115 
120 
125 
130 
200 
210 
220 
230 
240 
245 
250 
260 
270 
230 
300 
310 
320 
2?) 
330 
400 



"I Til 

" TURNOS"; 



CLS 

X^RND(S3)+16 

T1=T1+1 

PRINT@?06,"T U R N : 

PRINT2980, • JOGO EM ";T2! 

I FT l»T2* 1 THENGOTO& 1 00 

F0RI-14T0101 

SET (I, 7) e SET (1,40) 

NEXT I 

FORI*7T020 

SET (14, I):SET(15,I):SET(100, I):SET<101, I) 

IFI-*40THEN230 

NEXTI 
F0RI-27TCM0 

GOT 0240 
F0RI-13T02? 
NEXTI 
F0RX*0TQ6 

SET (7+1, IS) 



SET(7+I,29) I SET U 02+1. 13) : SET (102+1, 



NEXTI 
PRINT®77,CHR$C183) 



" S G$ ; 



"JP; :PRINTS99,CH 



Rt (157) 



Jti 



r; 



1035 
1040 
1045 
1046 
1050 
1065 
1070 
1100 
1110 
1120 
1130 
1140 
2100 
2200 
2210 
2250 



2230 
2290 
2295 
2300 
2310 
2990 
3000 
3100 
3300 
3400 
4000 
6000 
6010 
6020 
6030 
6100 
6110 
J 
6120 
X 



FCRT=1TG2 

F0RN=1T0K 

Q*=CHR*(133) 

IFT^2THENQ*=CHR$ (157) 

PRIN1@64* (RND(10)+2)+2+RND(37)+8,Q*5 

NEXTN:NEXTT 

PR I NTS522 , CHR* (133); @553 , CHR* (157); 

X=RND(33)+16 

Y--RND(30)+9 

B=l 

IFPOINT (X, Y) --1 THEN 1 100 

RESET (X,Y) 

X--X+A 

Y=Y+B 

IFX>100THENP=P+1:PRINT@77 J CKR*(1S3)J" , '!G$;" 

■ IPI J G03UB6000 : GOTO 1 1 00 
2260 IFX<15THENR=R+l:PRINT@99,CHR$(157) ; " ";J*!" 

" ; R; : 30SUB6000 : GOTO 1 1 00 
2270 I$-INKEY$: IFI$=" T'THENl 100 
C=C+1 

IFO300THEN100 

PRINT@92S,"T E M P : "J500-C; 
IFPOINT<X>Y)-— 1THEN3000 
SET(X, Y) 
G0T02100 
IFPOINT ( X p Y-E) ->OTHENB«-Bl G0T02200 

B-=-B 

G0T02200 

END 

0UT255.4 

FORW--1T03COC:NEXTW 

OUT 255,0 

RETURN 

CLS 

PRINT: PRINT: PRINTTABv 159) "R ESULTADO CO 

G 0":FRINT: PRINT: PRINT; 

PRINT: PRINTTAB( 15) CHR$( 133) ; " ";G$;" ";P;" 
"JR;" n M+1 m " ;CHR$( 157) ;: PRINT: PRINT: PRIN 
T: PRINT: PRINT: FRINTTAB( 18) "RALIZADO EM "Tl-ll " TURN 
OS" 
6130 END 
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TRS-80 MOD II / MICROS C/ CP/M 
SOFTWARE DISPONIVEL: 



1) TRS-80 MOD. II 

1.1 - Compiladores (TRS DOS/CP/M) 

1.2 - Sistemas Operacionais 

1.3 -Utilitarios 

1.4 - Aplicativos Standard Rad Shack 

2) TRS-80 MOD. II/MICROS C/ CP/M 

2.1 • Contabilidade 

2.2 - Folha de Pagamento 

2.3 - Controle de Estoque 

2.4 - Controle de Boutique 

2.5 - Mala Direta 

2.6 - Mercado Financeiro 

2.7 - Admimstracao Financeira 

2.8 - Contas a Pagar/Receber 

2.9 • Admimstracao Imobiliaria 
2.10- Condominio 

2.11 - Estatistica de Vendas 

2.12- Visicalc 

2.13 - Banco de Dados 

COMERCIALIZAMOS: 

Programas Objeto/Fontes 

Implantagoes/ Manuals 

PROJEDATA / READY 

Rua Barao de Mesquita n.° 712-A 
Andarai — Cep. 20.540 Rio de Janeiro 
Fones: 258-7599 e 273-8387 



Solicite a visita de nossos Representees 
Tecmcos. 



TK82-C 
CP-200 

NEZ8000 ZX81 



SOFTWARE PARA 
GRAVA^AO E 
LEITURA DE 
DADOS EM FITA 
TOS-3 R 

COM O TOS-3R VOCfi PODERA 
GERAR SEUS CADASTROS EM 
FITA, SEM LIMITE DE MEMORIA. 
COM O TOS-3R VOCfi TAMBltM 
VAI LER E GRAVAR SEUS PRO- 
GRAMAS 14 VEZES MAIS RAPIDO 
QUE O NORMAL, POR APENAS 
3 ORTN'S. 

Sem alteracdes no HARDWARE 
Fartamente dooumentado 



Jogoe — 2 ORTNs 

— Otelo 

— Imperloe Eepeciaia 

— Fore* e Vein* 

— E muitoe outros 



Aplicativoe - 3 ORTNS 

— Controle de 
eatoques 

— Rotinas de 
controle de video 



Solicite catalogo gratis 



Pedidos em cheque nominal cruzedo 



3R 



CONSULTORIA E 
INPORMATICA LTDA 
Rua Parlquia. 3333 /SOI 
Belem-Pa CEP: 66 000 
(Ml) 223-8846 



filiada ao 




ANO 



Ha 2 anos contribuindo com 
a informatica brasileira! 

Leia e assine: 

/Micro 




A PRIMEIRA REVISTA BRASILEIRA DE MICROCOMPUTADORES 

Publicapao da ATI Editora 
que agora Ihe oferece tambem 



Informatica & 
Administracao 



Se voce na"o quiser cortar sua revista, tire uma xerox do cupom abaixo 



nome 








empresa 


profissao 


cargo 






endereco para remessa 




cidade 


cep 


estado 





□ c . . Assinatura anual 
Micro Sistemas CrS 10.000.00 

□ Informatica & Administracao CrS 8.000,00 

(Zl Micro Sistemas + Informatica & Administracao CrS 15.000 00 



Junte a estes dados cheaue nominal a 

ATI Editora Ltda. 

Al. Gabriel Monteiroda Silva, 1229 

S§o Paulo - SP - CEP 01441 

Rua Visconde Silva, 25 

Rio de Janeiro - RJ - CEP 22281 

(seu recibo sera enviado pelo correio) 



A Magnex 





l g exibicao 



m FEiRfl inTERnftcianftL 

DE tnFDRfTlPiTlCPi 

o microcomputador 
que voce pode 
ver por dentro. 




Garantia incondicional de quahdade 



Voce sab ia que o microprocessador Z80 executa ma is instrucoes 
do que as descritas em seu manual? 



As instrucoes secretas do Z80 



Jorge Mendes 



A ~| s instrucoes dos microprocessadores de 8 bits sao for- 
madas em geral por 1 byte (8 bits), onde sao mdica- 
dos a operacao e o(s) registro(s) envolvido(s). seguido 

em alguns casos por 1 ou 2 bytes contendo endereco ou dados. 
Desta maneira, sao possiveis 256 instrucoes. 

microprocessador 8080A tern 244 instrucoes, enquanto o 
Z80 foi projetado para ter estas 244 instrucoes (para que um 
programa feito para o 8080A funcione no Z80) e mais algumas 
instrucoes, sendo que parte delas resulta do niimero major de 
registros internos no Z80 do que no 8080A. 

A solucao encontrada para se conseguir mais que 256 ins- 
trucoes no Z80 foi reservar 4 instrugoes (veja a figura 1 ) das 
possiveis 256 para mdicar que o pr6ximo byte deve ser mter- 
pretado como instrucao ao mvds de endereco ou dados. Deste 
modo, senam possiveis mais 1024 instrucoes, mas apenas442 
delas sao divulgadas pelo fabncante (ED63H equivalente a 22H 
e ED6BH equipvalente a 2AH na*o estao mcluidas neste total). 
Estas somadas as instrucoes de 1 byte, perfazem o total de 694 
instrucoes. 



■m 


INSTRUCAO 


■• OPICIAL DK 
INSTRUCOES 


No DE INSTRUCOES | 
NAO DIVULGADAS 


CM 

DDH 
EDH 

IN 


op. logicaa e coa bits 

op. com o registro IX 

op. diversaal E/S, bloco.etc. 1 

op. com o reqiatro 11 


248 

70 
54 

70 


8 

215 

215 


TOTAL 


442 


438 



Figura I 

A seguir serao descntas 438 instrucoes nao divulgadas pelo 
fabncante do Z80. 

1 . Shift Left Invertido 

Podemos observar que existem os c6digos de instrucao de 
CB00H a CB2FH e de CB38H a CBFFH. A execucao dos c6di- 
gos de CB30H a CB37H faz com que o conteudo do correspon- 
dente registro de 8 bits seja deslocado de 1 bit para a esquerda, 
o conteudo do bit 7 va para o Flag Cany e o bit assuma o 
estado 16gico 1 (veja a figura 2). Podemos chamar esta mstru- 
9S0 de SLI (Shift Left Inverted); veja a figura 3. 



Figura 2 



CY-«- 


7 6 5 4 3 2 1 


31 - 1 



c6digo 


INSTRUgAO 


CB30H 


SLI B 


CB31H 


SLI C 


CB32H 


SLI D 


CB33H 


SLI E 


CB34H 


SLI H 


CB35H 


SLI L 


CB36H 


SLI (HL) 


CB37H 


SLI A 



Figura 3 

Em termos antme'ticos, esta instrucao multiphca o valor do 
registro por dois e soma uma umdade : 

registro-* 1 + 2 * registro 

2. Instrucoes com os registros IX e I Y 

Observando as instrucoes que envolvem o registro IX (IY), 
venficaremos que elas sa"o as mstrufoes que lidam com HL, 
precedidas pelo byte DDH (FDH). Este byte aciona o registro 
IX (IY) no lugar de HL para a execucao da instrucao seguinte. 

Em outras palavras, colocando-se o byte DDH precedendo 
uma instrucao que envolve HL (exceto EX DE, HL e EXX, 
al£m das instrucoes miciadas pelo byte EDH), estaremos subs- 
tituindo HL por LX e (HL) por (IX+dd): 

09 H : ADD HL , BC 



DD09H 

7EH 
FD7EddH 

CB86H 
DDCBdd86H 



ADD 

LD 
LD 



IX , BC 

A , ( HL ) 

A , ( iY + dd ) 



RES , ( HL ) 
RES 0, (IX+dd) 



124 
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Deste modo, conseguimos as seguintes instrucoes, que nao 
s3o divulgadas pelo fabncante : 
a) Shift Left In vert i do: 



CB36H 
DDCBdd 36H 



SLI (HL) 
5LI (IX + dd ) 



b) Instrucoes com os registros IX e IY : 

Colocando o byte DDH (FDH) precedendo as instrucoes 
que comecam pelo byte CBH (exceto BIT) e que nao envolvem 
HL, teremos o seguinte resultado: 

CB80H : RES , B 

FDCBdd80H : RES 0, (IY + dd) e 

LD B ,( IY + dd ) 

(FDCBdd80H = FDCBdd86H + FD46ddH) 

Observe que o bit da posicSo IY+dd da mem6na foi para 
o estado 16gico e, logo em seguida, o conteudo desta posicao 
da mem6na foi transfendo para o registro B. Esta instrucao 6 
equivalente a duas instru96es oficialmente divulgadas no ma- 
nual do fabncante (veja a figura 4). 





xy (hex) 




B 


C 


D 


E 


H 


L 


- A 


RLC 


00 


01 


02 


03 


04 


05 


06 07 


RRC 


08 


09 


0A 


0B 


oc 


0D 


0E OF 


RL 


10 


1 1 


12 


13 


14 


15 


16 17 


RR 


18 


19 


1A 


1B 


1C 


1D 


1E 1F 


SLA 


20 


21 


22 


23 


24 


25 


26 27 


SRA 


28 


29 


2A 


2B 


2C 


2D 


2E 2F 


SLI 


30 


31 


32 


33 


34 


35 


36 37 


SRL 


38 


39 


3A 


3B 


3C 


3D 


3E 3F 


BIT 0, 














46 - 


BIT 7, 














7E - 


RES 0, 


80 


81 


82 


83 


84 


85 


86 87 


RES 7 , 


B8 


B9 


BA 


BB 


BC 


BD 


BE BF 


SET Or 


CO 


C1 


C2 


C3 


C4 


C5 


C6 C7 


SET 7, 


F8 


F9 


FA 


FB 


FC 


FD 


FE FF I 



Figura 4 - Operacoes com (IX+dd) ou com (IY+dd) com transfer encia 
do resultado para urn registro da VCP: cddigo DDCBddxyH ou 
FDCBddxyH. 

3. IX e IY divididos em registros de 8 bits 

Se estendermos o procedimento descnto no item 2 para H e 
L separadamente, teremos instrucoes envolvendo apenas meta- 
de (8 bits) dos registros IX e IY. Em outras palavras, colocan- 
do-se o byte DDH precedendo uma instrucao que envolva H 
ou L, mas nao envolvendo HL, como LD H,(HL), estaremos 
efetuando operacoes com o byte superior ou o byte inferior 
de IX. Chamaremos, respectivamente, de MSB de IX de HXe 
LSB de DC de LX; analogamente, teremos HY e LY. Exemplo 
(veja tambdm a figura 5): 



2^H 
DD24H 
A5H 
FDA5H 



INC H 

INC HX 

AND L 

AND L Y 



C6DIGO (HEX) 


INSTRUCAO 


C6DIGO (HEX) 


INSTRUgAO 


DD24 


INC 


HX 


DD6A 


LD LX.D 


DD25 


DEC 


HX 


DD6B 


LD LX , E 


DD26nn 


LD 


HX,nn 


DD6C 


LD LX , HX 


DD2C 


INC 


LX 


DD6D 


LD LX , LX 


DD2D 


DEC 


LX 


DD6F 


LD LX,A 


DD2Enn 


LD 


LX,nn 


DD7C 


LD A,HX 


DD44 


LD 


B,HX 


DD7D 


LD A,LX 


DD4 5 


LD 


B,LX 


DD84 


ADD A,HX 


DD4C 


LD 


C,HX 


DD85 


ADD A , LX 


DD4D 


LD 


C.LX 


DD8C 


ADC A,HX 


DD54 


LD 


D,HX 


DD8D 


ADC A,LX 


DD55 


LD 


D,LX 


DD94 


SUB HX 


DD5C 


LD 


E,HX 


DD95 


SUB LX 


DD5D 


LD 


E,LX 


DD9C 


SBC A , HX 


DD60 


LD 


HX,B 


DD9D 


SBC A , LX 


DD61 


LD 


HX,C 


DDA4 


AND HX 


DD62 


LD 


HX,D 


DDA5 


AND LX 


DD6 3 


LD 


HX,E 


DDAC 


XOR HX 


DD64 


LD 


HX,HX 


DDAD 


XOR LX 


DD65 


LD 


HX.LX 


DDB4 


OR HX 


DD67 


LD 


HX,A 


DDB5 


OR LX 


DD68 


LD 


LX,B 


DDBC 


CP HX 


DD69 


LD 


LX,C 


DDBD 


CP LX 



Figura 5 - Observe que trocando-se DD por FD obtim-se as instrucoes 
equivalentes para IY. 



Note que isso nSo se aphca as instrucoes comecadas pelos 
bytes CBH e EDH. 

CONCLUSAO 

Com isto, urn total de 438 novas instrucoes estao disponi- 
veis para utilizacao. 

Mas como os Assemblers existentes s6 reconhecem as ins- 
trucoes oficialmente descntas em seus manuals, teremos que 
utihzar DEFB (defirucao de byte) ou DEFW (defimcao de pa- 
lavra, 2 bytes) para introduzir as novas instrucoes no programa. 

As instrucoes com HX, LX, HY e LY podem ser mtroduzi- 
das no programa conforme os exemplos a seguir: 



INC HX 



LD LY , 10 



DEFB DDH 



INC 



DEFB FDH 



L D L , 1 

A nao divulgacao oficial destas instrucSes pelo fabncante 
provavelmente se deve ao fato de que a descncao de urn con- 
junto excessivamente grande de instrucoes podena dificultar a 
fabncacao de novos produtos compativeis com o Z80. 

Evidentemente estas instrucoes nao divulgadas nao serf o tao 
utilizadas como as instrucoes oficiais. Por exemplo, HX, LX, 
HY e LY s6 serao usadas em programas que necessitem de mui- 
tos registros de 8 bits para operacSes 16gicas ou matemdticas, 
mas que nao necessitem de IX e IY para enderecamento. 

As instrucoes descntas foram testadas em microprocessa- 
dores Z80 fabncados pela ZILOG, MOSTEK e NEC. ■ 



Jorge Mendes 4 Engenheiro Eletrdnico formado pelo ITA. Trabalha 
atualmente na Nuclebra's Engenbaria S. A. 
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_Jn 
clicS? 





Coloque o display de cabeca para 
baixo. Faca o disquete tocar uma 
musica de Roberto Carlos para 
a visa r que o programa ja esti 
carregado. Armazene quatro bytes 
em apenas um, colocando 64 Kb 
em apenas 16 Kbde RAM. 
Invente um Interpretador unico 
para as linguagens BASIC, 
COBOL, Pascal e FORTH. 
Nao 4 preciso chegar a extremos, 
mas se voc§ tern pequenas rotinas 
eprogramas utilitirios realmente 
uteis tomando poeira em seus 
disquetes ou fitas cassetes, 
anted pe-se aos piratas e trate 
de divulga'-los. Envie-os hoje 
mesmo para: 
REDAQAO DA MICRO 
SISTEMAS - SEQAO DICAS 
Rua Visconde Silva, 25 
BOTAFOGO - RIO DE 
JANEIRO - RJ 
CEP 22281 

Desta forma sua descoberta 
podera" ser util para muitos e 
muitos, ao inve's de 
desmagnetizar-se com o tempo em 
suas fitas e disquetes... 



ZXTKCP-200 



SCROLL em Assembler 

Com estes quatro SCROLLs voce podera" "rolar" a 
tela para cima, para baixo, para a esquerda e direita, ra- 
pidamente. Eles foram colocados no initio da RAM, mas 
podem ser gravados em qualquer outro lugar, desde que 
se calculem os novos enderecos. Para comecar, digite : 

1 RET 11111111111111111111111 
11111111111111111111111111111111 
11111111111111111111111111111111 
111 

Atencffo : sao 90 caracteres. 

Entre com os dados do bloco, usando para tal o Moni- 
tor Assembler publicado na MICRO SISTEMAS n9 23 
(pagina 10). Faca uma c6pia em fita cassete e teste o 
programa com RAND USR: 

RAND USR 1 65 14 - SCROLL para cima 
RAND USR 1 6529 - SCROLL para baixo 
RAND USR 1 6553 - SCROLL para a direita 
RAND USR 1 6578 - SCROLL para a esquerda 



16514 


2A 


0C 


40 


E5 


11 


21 


00 


19 


16522 


Dl 


01 


D6 


02 


ED 


B0 


C9 


2A 


16530 


0C 


40 


01 


B4 


02 


09 


11 


21 


16538 


00 


E5 


19 


Dl 


EB 


ED 


B8 


AF 


16546 


06 


20 


23 


77 


10 


FC 


C9 


2A 


16554 


0C 


40 


01 


IF 


00 


3E 


16 


C5 


16562 


09 


E5 


Dl 


13 


ED 


B8 


23 


70 


16570 


0E 


20 


09 


3D 


CI 


C8 


18 


EF 


16578 


2A 


0C 


40 


3E 


16 


01 


IF 


00 


16586 


23 


E5 


Dl 


23 


C5 


ED 


B0 


2B 


16594 


70 


CI 


3D 


C8 


23 


18 


Fl 





Edgard Costa Campos — RJ 
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Agilize os laQOS FOR-NEXT 

A forma classica apresentada nos manuals para o fe- 
chamento dos lacos FOR-NEXT alinhados 6: 
10 FOR 1= 1 TO 10 : FOR J= 1 TO 10 :FORK= 1 TO 10 
20 NEXT K : NEXT J : NEXT I 

Como alternativa.tambe'm costumam oferecer: 
20 NEXT K, J, I 

O maior inconveniente, em qualquer um dos casos, € 
a preocupacffo que devemos ter em fomecer as varidveis 
na sequentia correta. Mas, usando-se: 
20 NEXT : NEXT : NEXT 

ale'm de eliminar a preocupacSo com a sequentia, ganha- 
se em tempo de execuclo! Para comprovar, basta aumen- 
tar cada um dos lacos para, digamos, 50 repeticOes e 
cronometrax cada uma das alternativas. 



Roberto Quito de Sant'Anna - RJ 
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Substituao IF-THEN 

Vamos supor o seguinte problema: 

• Se Ae menorouigual a 100, B i igual a 0; 

• Se A est* compreendido entre 101 e 200, B i igual 

• Se A esta" compreendido entre 201 e 300, B 6 igual 
a 2; 

• Se A e maior que 300, B 6 igual a 3. 

Este problema pode ser facilmente resolvido atrave's 
da combinacao de algumas instrucCes IF THEN, usando- 
se algumas linhas de programa. Podemos.entretanto.re- 
solve"-lo em uma unica linha e, o que 6 mais interessante, 
sem usar um unico IF THEN: 



B=-(A > = 101) 
(A> = 301)) 



* -((A > = 101) + (A> = 201) + 



Parece estranho, mas nao 6: toda expressSo relacional 
ou logica (usando = ,>,<,> = ,< =,<>,AND, OR 
NOT) retoma ao programa o valor se 6 falsa ;e a -1 se 
£ verdadeira. O segredo consiste em colocar todas as 
condi90es possiveis entre parenteses e, com alguma ima- 
ginacao, combinar os resultados por meio de adicoes 
e/ou multiplicacoes, obtendo assim o efeito desejado. 

Neste exemplo que apresentamos, se A= 257, os re- 
sultados serao: (A =101)= -1,(A > = 201)= -1,.... 
(A>=301) =0 e, em consequencia, B =-(-1) * 
— (—1—1+0) = 2, conforme o desejado. 

Roberto Quito de Sent' Anna - RJ 
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Posicione o PRINT @ 

Em vez de fazer calculos ou consultar o lay-out do 
video para usar a funcfo PRINT @ , determine a posi- 
ca"o da funca"o PRINT @ da forma mais simples, refe- 
renciando apenas a linha L (de 1 a 15) e a coluna C (de 
la 63): 

10AT=64*(L-1)+C 
20 PRINT @ AT, 

Se voce disp6e de BASIC DISCO, 6 ainda mais ftcfl: 
1 DEFFNAT(L,C)= 64*(L-1)+C 



50 X= 10 : Y= 25 : REM Linha 10, Coluna 25 



100 PRINT @ FNAT(X,Y), 

£ preciso apenas ter cuidado com a ultima linha, por 
causa do "rolamento" da tela (SCROLL), e com as ul- 
timas posicSes em cada linha, por causa da alimentacao 
automa"tica (LINE FEED). Uma observacao importante : 
esta funcfo que apresentamos conta linhas e colunas a 

partir de um. 

Roberto Quito de Sent' Anna - RJ 
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Paginando o video 

Para imprimir, na listagem de um relat6rio ou arqui- 
vo, somen te um determinado numero de linhas por pd- 
gina de video (15, no mdximo), e passar para a pr6xima 
"pagina" somente quando desejar, use este me'todo: 
10FORN=1 TO 100 



50 PRINT A, B, C 



80 IF N/14 = INT(N/14) GOSUB 500 
90 NEXT 
100 END 



500 INPUT "APERTE < ENTER > PARA NOVA PA- 
GINA" ;X 
510 CLS: RETURN 

A linha 80 realiza o desvio para a sub-rotina a cada 
multiplo de 14 (neste exemplo); e a linha 100 evita um 
RETURN sem GOSUB ao final do laco. 

Roberto Quito de Sent'Anne — RJ 
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Padronizacao monet£ria 

Padronize a apresentacSo de valores monetanos com 
essa sub-rotina que deve ser usada da seguinte forma: o 
valor deve ser colocado na varidvel A, e retornarf como 
string na varidvel A$ . Por exemplo : 



fl- 



H$ = 



1 

' ir 
*♦■_' 

•378 9 

136? .6: 

77. F1.4 



1 .98 
43 .80 

673.90 
1863 .64 

77 73 



90^0 


LET fl**STR$ Cft+ 605 ) 




9010 


FOR R*l TO LEN Ri 




9020 


IF R$ifl>0 " . " THEN NE^T ft 


9030 


LET *$ = fi$<: TO R+2) 




9040 


RETUPN 





Mircio Luiz Cardoso — SP 
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Curso de 
Assembler 




Para esta hcao reservamos a descn^o do grupo de troca, 
transference de bloco e pesquisa, um grupo de mstru- 
coes espectfico do microprocessador Z80. 

As funcSes executadas por este grupo sao as seguintes: 

- troca do conteudo dos registradores principals com os regis- 
tradores alternatives; 

- troca do conteudo de um registrador de 1 6 bits com o topo 
do STACK; 

- transference de um bloco de bytes de uma 2rea para outra 
drea de mem6ria ; 

- pesquisa de um byte na memona. 

Vamos agora conhecer a operacao destas instrucoes. 
1 - Troca do conteudo dos registradores DE, HL 

Formato:EX DE, HL 

Operagdo: Troca o conteudo do par de registradores DE, 
com o par de registradores HL. 

Cddigo objeto: 



EX 



AF 



AF 



EX DE , HL 



i i i i i i i 
1110 10 11 

■ ' ' ■ ■ i 



>EB 



Descricdo: Os dois bytes contidos nos registradores de 16 
bits DE e HL sao trocados. 



EX 



DE , HL 



DE 



>HL 



Ciclos de maquina (M): 1 

States (T): 4 

Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores DE conte'm 2850H 
e o conteudo do par de registradores HL 6 50O0H, apos a ms- 
trucao EX DE, HL o conteudo do par de registradores DE serf 
5000H e o par de registradores HL contera" 2850H. 

2 - Troca do par de registradores AF principal com alternativo 

Formato': EX AF. AF' 

Operacao: Troca o conteudo do par de registradores AF 
com o par de registradores AF'. 
Cddigo objeto: 



iiiiii i 
10 

I 1 I I I 1 I 



> 08 



Descricdo :Os dois bytes contidos no par de registradores 
AF do conjunto principal de registradores 6 tro- 
cado com os dois bytes contidos no par de regis- 
tradores AF' do conjunto alternativo de registra- 
dores. 



EX 



AF 



AF 



Ciclos de maquina (M): 1 

States (T): 4 

Flags afetadas: Nenhuma 

Como exemplo, se o conteudo do par de registradores AF e 
1780H e o conteudo do par de registradores AF' e" F0O0H, 
ap6s a instrucao EX AF, AF' o par de registradores AF conte- 
ra' FOOOH e o par de registradores AF' conter£ 1780H. 

3 — Troca do conjunto principal com o conjunto alternativo 
Formato: EXX 

Operacao: Troca o conteudo dos registradores do conjunto 
principal com o conteudo dos registradbres do 
conjunto alternativo. 
Cddigo objeto: 

EXX 



110 110 1 



Descricdo :Os dois bytes contidos nos pares de registradores 
BC, DE e HL do conjunto principal sao trocados 
com os dois bytes contidos nos pares de registra- 
dores BC, DE' e HL' do conjunto alternativo. 

► bc 



EXX 



Ciclos de maquina (M): 1 
States (T): 4 
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Flags afetadas: Nenhuma 

Como exemplo, se o conteudo dos registradores e: 



C0N3UNT0 


PRINCIPAL 


BC 


1111H 


DE 


2222H 


HL 


3333H 



C0N3UNT0 


ALTERNATIVO 


BC 


4444H 


DE' 


5555H 


HL' 


6666H 



Apos a execucao da mstrucao EXX seu conteudo serti: 



C0N3UNTO 


PRINCIPAL 


BC 


*%%*H 


DE 


5555H 


HL 


6666H 



C0N3UNT0 


ALTERNATIVO 


BC 


1111H 


DE' 


2222H 


HL' 


3333H 



4 - Troca do topo do STACK com HL 

Formato:EX (SP), HL 

Operacdo: Troca o conteudo do topo do STACK com o 
conteudo do par de registradores HL. 



Cddigo objeto: 
EX 



(SP) 



HL 



1 


1 


1 










1 


1 

I — 


1 



Descricdo:0 byte contido no registrador L 6 trocado com o 
byte do endereco de memona especificado pelo 
conteudo do registrador SP (STACK POINTER) 
e o byte do registrador H € trocado com o byte 
contido no pr6ximo endereco de mem6ria(SP+l). 



EX 



(SP) 



HL 



(SP) 



H 



^ ►(SP+I) 



Civ lot de mdquina (M): 5 

States (T): 19(4,3,4,3,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores HL contdm 
7000H, o STACK POINTER contem 8800H, o endereco de 
mem6na 8800H contem o byte 1 1H e o endereco de mem6na 
8801 H contem o byte 22H, apos a instruct EX (SP), HL o 
par de registradores HL contera" 221 1H, a posicSo de mem6ria 
8800H contera 00H, a posicao de memdria 8801 H contera" 
70H e o STACK POINTER contera 8800H. 



5 - Troca de topo do STACK com IX 

Formato:EX (SP), IX 

Operaqdo: Troca o conteudo do topo do STACK com o 

conteudo do registrador IX. 
Cddigo objeto: 



EX 



(SP) 



IX 



— T 1 I 1 ! ! ! 

110 1110 1 



— I — I — I— I — I — I — I— 
1110 11 

■ I . I ■ I I — 




Descricdo:0 byte de mais baixa ordem contido no registra- 
dor de 16 bits LX e trocado com o byte do ende- 
reco de memdna especificado pelo conteudo do 
STACK POINTER e o byte de alta ordem e" tro- 
cado com o byte contido no prdximo endereco 
de memona (SP+1). 



EX 



(SP) 



IX 



IX. 



IX. 



(SP) 



>(SP+1) 



Ciclos de mdquina (M): 6 

States (T): 23(4, 4, 3,4, 3,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o registrador IX conte"m 221 1H, o 
STACK POINTER contem AOOOH, o endereco de mem6na 
A000H contem 90H e o endereco de mem6na A001H contdm 
45H, apos a instrucSo EX (SP), IX o registrador IX contera 
4590H, a posiclo de memona AOOOH contera 1 1H, o endereco 
de mem6na A001H contera" 22H e o STACK POINTER conte- 
ra AOOOH. 

6 - Troca do topo do STACK com IY 

Formato: EX (SP), IY 

Operaqdo: Troca o conteudo do topo do STACK com o 

conteudo do registrador IY. 
Cddigo objeto: 



EX 



(SP) 



IY 



1 


1 


1 


1 


" ■ 

1 


1 





1 


1 


1 


1 











1 


1 




Descricdo:0 byte de baixa ordem contido no registrador de 
16 bits IY 6 trocado com o byte do endereco de 
memona especificado pelo conteudo do STACK 
POINTER e o byte de alta ordem contido no re- 
gistrador IY € trocado com o byte contido no 
pr6ximo endere?o de mem6na (SP+I). 



EX 



(SP) 



IY 



IY 



L< 



>(SP) 



(SP41) 



Ciclos de mdquina (M): 6 

States (T): 23(4, 4, 3, 4, 3, 5) 

Flags afetadas: Nenhuma 

Como exemplo, se o registrador IY contem 4050H e o 
STACK POINTER contdm 9900H, o endere?o de membna 
9900H contem 00H e o enderego de memdna 990 1H contdm 
FFH, ap6s a instruca"o EX (SP), IY o registrador IY conterd 
FFOOH, o endereco de mem6na 9900H contem 50H, o endere- 
co de memdna 990 1H conteri 40H e o STACK POINTER » 
conterd 9900H. ^ 
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7 - Transfere byte e incrementa 

Format o: LDI 

Operacdo: Transfere urn byte, incrementa DE e HL e decre- 
menta BC. 

Cddigo objeto: 

LDI 



>ED 
>A0 



1 


I — 

1 


1 


1 — 



— 

1 


1 


— 



1 


1 





1 







J 







I— 






Descricdo:0 byte contido no endereco de mem6ria especifi- 
cado pelo conteudo do par de registradores HL e 
transfendo para o endere90 de membna especifi- 
cado pelo conteudo do par de registradores DE, 
incrementa os pares de registradores DE e HL e 
decrementa o conteiido do par de registradores 
BC (Byte Counter). 

(DE)^ (HL) 



LDI 



HL-+ 



BC -+ 



DE + 1 



HL + 1 
BC-1 



Ciclos de mdquina (M): 4 
State (Th 16(4, 4, 3,5) 

Flags afetadas: S - nab afetada 

Z — nSo afetada 

H — ressetada 

P/V - setada se BC-1 ^ 0. Sen Jo, 6 ressetada. 

N - ressetada 

C — nSo afetada 
Como exemplo, se o par de registradores HL conte'm 1 1 1 1H, 
a posicab de mem6na 1 1 1 1H conte'm o byte 88H, o par de re- 
gistradores DE conte'm 2222H, a posicao de mem6na 2222H 
conte'm o byte 66H e o par de registradores BC conte'm 7H, 
apos a instrucao LDI, o par de registradores HL contera* 2223H, 
a posicao de mem6na 2222H conterd 88H e o conteiido do par 
de registradores BC sera 6H. 

Vejamos outro exemplo: mover 80 bytes consecutivos de 
BUF1 para BUF2: 



LD 



HL 



BUF 1 



6 transfendo para o endereco de mem6na espe- 
cificado pelo conteiido do par de registradores 
DE, os pares de registradores DE e HL sab 
incrementados e o par BC 6 decrementado. Se o 
conteiido do par BC for diferente de zero, a 
operacSb 6 repetida at^ que BC - 0. Se o valor 
inicial de BC for zero, a instrucao LDIR ira mo- 
ver 64 Kbytes. 



LDIR 



<DI )« 



DE<+ 



HL^ 



BC 4 



(HL) 
DE + 1 
HL+1 
BC-1 



Ciclos de mdquina (M): 5 
States (T): 21(4, 4,3,5,5) 
Flags afetadas:S - nSo afetada 

Z — na"o afetada 

H - ressetada 

P/V - ressetada 

N - ressetada 

C - nao afetada 
Como exemplo, se o par de registradores HL conte'm 1 1 1 1H, 
o par DE conte'm 2222H, o par BC conte'm 3H, e estas localiza- 
cbes de mem6na tern os seguintes conteiidos: 

(1111H) . 88H (2222H) : 66H 



(1112H) 
(1113H) 



36H 
A5H 



(2223H) 
(222*H) 



59H 
C5H 



Entao, apbs a execucao da instrucao LDIR, o conteudo des- 
tas areas serd o seguinte: 

(2222H) : 88H 

(2223H) : 36H 

(2224H) : A5H 

E o conteudo do par de registradores HL serf 1 1 14H, o par 
de registradores DE contera' 2225H e BC terd 0. 

Outro exemplo: mover 80 bytes consecutivos de BUF1 para 
BUF2: 



(1111H) 


: 88H 


(1112H) 


: 36H 


(1113H) 


: A5H 











LD 


HL , BUF 1 


LD 


DE , BUF 2 






LD 


DE , BUF 2 


LD 


BC , 80 






LD 


BC , 80 


LDI 








LDIR 




3P 


PO , LOOP 


9- 


- Transfere 


byte e decrementa 



LOOP 



8 — Transfere urn bloco de bytes incrementando 

Formato: LDIR 

Operacdo: Transfere um bloco de bytes de uma localizacSb 

de membna para outra. 
Cddigo objeto: 

LDIR 



Fomato: LDD 

Operacdo: Transfere um byte e decrementa DE, HL e BC. 

Cddigo objeto: 



LDD 



1110 1101 

I I I I — i i I 

101 10000 

— — I I I I I I 



>ED 

>B0 



1 


— 

1 


1 


— 



1 


1 





— 

1 


1 





1 





1 




— 









>ED 

>A8 



Descricd~o:0 byte contido no endereco de mem6na especi- 
ficado pelo conteudo do par de registradores HL 



Descrigdo:0 byte contido no endereco de membna especifi- 
cado pelo conteudo do par de registradores HL 6 
transfendo para o endereco de mem6na especi- 
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ficado pelo conteudo do par de registradores DE 
e decrementa o conteudo dos pares DE, HL e BC. 



l DO 



<DE)-+ 



DE* 



HL* 



BC * 



(HL) 
DE-1 
HL-1 
BC-1 



v Ciclos de mdquina (M): 4 
States (T): 16(4, 4, 3, 5) 
Flags afetadas:S - nfo afetada 
Z - nao afetada 
H — ressetada 

P/V - setada se BC-1=£0; sena"o i ressetada 
N - ressetada 
C - nfo afetada 
Co mo exemplo, se o par de registradores HL contdm 1 1 1 1H, 
a posica"o de mem6ria 1 1 1 1H conte'm o byte 88H, o par de re- 
gistradores DE conte'm 2222H, a posica"o de memoria 2222H 
conte'm o byte 66H e o par de registradores BC conte'm 7H, en- 
ta" o a execucSo da instrucao LDD resultari no seguinte : 



HL 



DE 
BC 



1110H 
2221H 

6H 



(1111H) : 88H 
(2222H) : 88H 



Outro exemplo: mover 80 bytes consecutivos de BUF1 para 
BUF2: 



LD 


HL , BUE 1 


LD 


DE , BUF 2 


LD 


BC , 80 


LDD 




3P 


PO . LOOP 



LOOP 



Observem que neste caso a transference £ decrescente, isto 
6, sao movidos 80 bytes abaixo de BUF1. No caso de LDI, a 
transference 6 crescente, ou seja, sao movidos 80 bytes a par- 
tirdeBUFl. 

10 - Transfere um bloco de bytes decrementando 

Formato: LDDR 

Operacdo: Transfere um bloco de bytes de uma localizacao 
de mem6na para outra. 

Codigo objeto: 

LDDR 



— i — i i i i i i 
1110 110 1 

-H — I — I 1 — I — I — h- 



10 1110 

■ ' I I I I — I — ■ 



>ED 



>B8 



Descricao:0 byte contido no endereco de mem6na especi- 
ficado pelo conteudo do par de registradores HL 
6 transfendo para o endereco de mem6na especi- 



Impressora 

Matricial 

Elgin Lady 



Velocidade de impressao 100 cps 
132colunasa 10cpi 



A impressora Elgin Lady e o novo padrao para aplicacoes profissionais 

em seu computador pessoal ou microcomputador. 

Com velocidade de 100 CPS, os caracteres impressos em matriz de pontos 

no formato 9 x 7, sao de alta resolucSo. Com capacidade de 132 colunas, 

comporta at6 264 caracteres /linha. 

Atraves de uma tecla, em modo conversacional, 18 funpoes sao disponiveis 

para completa definipao do formato de impressao, 

entre as quais 1 1 funcoes podem ser programadas via software. 

Com o modulo Elgingraph, a impressora Elgin Lady 
constitui a melhor escolha para seu microcomputador, 
em aplicacoes que requerem total flexibilidade grafica 
atraves de caracteres semi-gr^ficos ou funpoes gr^ficas 
com enderepamento a nivel de agulhas. 
As interfaces, intercambiaveis a nivel de operador, 
capacitam a Elgin Lady a uma serie de diferentes conexoes 
com a maioria dos microcomputadores 
e sistemas disponiveis no mercado. 




D«virfo<* ELGIN MAOUINAS S.A 
Ru* Barto de Campmas. 305 
C£P01?0l T< 

1)37805 ELGI BR 
Fabf^a em Mogi das Ouzes SR 
Filiada A ABCOMP 




Conhe^a a nova Elgin Lady em 



Sao Paulo: MICROSHOP Fone 282 2105 • COMPUTERLAND Fone 258 2954 . COMPUSHOP Fone 212-9004 
SERVIMEC Fone 222 1511 • IMARES Fone 881-0200 Campinas: COMPUTIOUE - Fone 32-3810 

Rio de Janeiro: COMPUTIOUE • Fone 267 1093 • CLAPPY Fone 253 7930 • TECNITRON Fone 233-9670 
Porto Alegre: INFORMATIQUE Fone 21 4189 • COMPUMiDIA - Fone 22-5061 
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CURSO DE ASSEMBLER - IX 



LDOR 



ficado pelo conteiido do par de registradores DE, 
e os pares de registradores DE, HL e BC sao de- 
crementados. Se o conteiido do par de registra- 
dores BC e" diferente de zero, a operacao e - repe- 
tida ate - que BC = 0. Se o valor initial de BC for 
zero, a mstrucSo LDDR ira" mover 64 Kbytes. 

(DE)*— -(HL) 



DE + 



HL «- 



BC -4 



DE-1 



HL-1 
BC-1 



Ciclos de mdquina (M): 5 
States (T): 21(4,4,3,5,5) 
Flags afetadas: S — na"o afetada 
Z - na*o afetada 
H - ressetada 
P/V - ressetada 
N - ressetada 
C - nao afetada 
Comoexemplo, se o par de registradores HL conte'm 1 1 14H, 
o par de registradores DE conte'm 2225H, o par de registrado- 
res BC contem 3H e as posicdes de memona tern os seguintes 
cont^udos: 



(1114H) : A5H 
(1113H) : 36H 



(1112H) 



88H 



(2225H) : C5H 
(2224H) : 59H 
(2223H) : 66H 



Ap6s a execucao de LDDR o conteiido dos registradores e 
posi?6es de mem6na serd o segumte: 

HL : 1111H 



OE : 2222H 
BC : 0* 
(111*H) : A5H 
(1113H) : 36H 
(1112H) : 88H 



(2225H) : A5H 
(2224H) : 36H 
(2223H) : 88H 



Outro exemplo: mover 80 bytes consecutivos de BUF1 para 
BUF2: 



L0 
LD 
LD 

LDDR 

Ate a proxima aula. 



HL f BUF 1 
DE , BUF 2 
BC , 80 



5. 



Amaury Coma de Almeida Moraes Junior 4 formado pelo curso de 
Aridlise de Sistemas da FASP, tendo feito diversos cursos de aperieiQoa- 
mento nas Areas de Eletrdnica Digital e Microprocessadores. 
Amaury trabalha como Analista de Sistemas na PRODESP, na area de 
mini '/microcomputadores, e presta consultoria a empresas para a instala- 
qSo de sistemas de microcomputadores. 



CHEGOU A SQLLI 



J JH 



A SUA EMPRESA AGORA 
TEM UM DEPARTAMENTO 
DE MICROINFORMATIC^ 



TUDO PARA 

OMPUTADORES 








• RAMCARD • SOFTCARD • VIDEOTERM • SOFTVIDEO SW • PROGRAMMER • PROTOCARD • INTF. DISKS 

INFT. PRINT • SATURN 128K RAM. • SATURN 64K RAM. • SATURN 32K RAM. • RANA QUARTETO • MICROMODEM 

• MICROBUFFER II • MICROCONVERTER II ■ MICRO VOZ II ■ ULTRATERM ■ ALF 8088 CARD 

■ A800 DISK CONT ■ MULTIFUNCTION CARD 

MICROCRAFT MICROCOMPUTADORES LTDA. 

ADMINISTRAgAO E VENDAS: AV. BRIG. FARIA LIMA, 1 .664 - 3? ANDAR - O 316 - CEP 01452 

FONES (01 1) 212-6286 E 815-6723 - SAO PAULO - SP - BRASIL 



• Informamos novos erros verificados na listagem do pro- 
grama RENUM, da materia Renumere sens programas em 
BASIC, MS n9 20, maio/83, pags. 70 a 81 : 



Passo 

570 

1530 

1740 

2000 

2030 

2040 

2460 

3010 

3230 



CorrecSo 

21F0FF 

CA191A 

DDF0FF 

FF7B 

Incluir label TERM 

Retirar a label TERM 

CB78 

4F 

2B 



• Foi tambdm constatado um erro no programa da Secao 
Conversao - Professor Corujinha, no TK82-C -, publicado 
em MS n9 23, agosto/83, pag. 16. Na linha 220, onde se le 
LETYS < "1"..., leia-se: 

220IFYS < 'T'ORYS > "3" THEN GOTO 210 



• Na materia Parabe'ns no dia certo, MS n9 24, setembro 
/83, pig. 93, a figura 1 mencionada no texto € a seguinte: 

500 DATA ALBERTO," 3/0 1/5 4" 
,ANA PAULA, "06/01/56" , etc. 

• Na materia Masterword: descubra a palavra (MS n9 23, 
agosto/83) foi omitido o seguinte paragrafo: "A rotina de 
som, escrita em linguagem de maquina, deve ser gravada em 
disco com a instrucSo BSAVE MASTERWORD. SOM, A$ 
302, L$ 19 antes do programa ser rodado". 

• Na edicao n9 24, setembro/83, na materia de Newton 
Braga Junior, "Simule um piano em seu teclado", pagina 
40, segundo paragrafo, setima linha, sairam errados os nu- 
meros das linhas que devem ser substituidas para a obten- 
cao de efeitos sonoros especiais. As linhas corretas, que sao 
as constantes da listagem 2 da materia, sao as de numero 
15, 16 e 45, e nao 3,4 e 1 l,como foi publicado. 

Pedimos desculpas por nossa falha. 



Por baixo 
de um bom i 
computador 
so pode existir 
uma mesa Cfr34M 



As Mesas para Terminals H&M sao tao boas quanto o 
seu computador. Sabe por que? Porque elas sao feitas 
com o mesmo know-how e o mesmo criterio de 
controle, seguranga e precisao, como sao feitos tambem 
os computadores. 

Alem disso, as Mesas para Terminals H&M possuem 
acabamento perfeito, fosfatizado e com fundo plaine. A 
base e de poliuretano na cor grafite e o painel na cor gelo. 
O tampo em todos os modelos e de madeira compensada 
de mogno ou virola, com revestimento de f6rmica fosca 
branca. 



Tudo isso com a qualidade, 
tecnologia e tradicao H&M que 
voce ja conhece, e que o seu 
computador estci esperando para 
conhecer. 
Consulte-nos pelo telefone ou colicite 
a visita de um representante H&M. 



C — ■--"■ ^ 



Filiada a 
ANFORSAI 



Representantes em todo o BrasM 



Hanka MaJdonado Ind e Com Ltda SP: Loo Paissandu. 72 - 1 1 • S/1 1 1 2 - Fones 227-9925. 227-9060 e 227-8033 - Cx Postal 7737 - Telegramas "PASTANKA" RJ: Av Franklin Roosevelt. 23 - 
B* -S/809 Fones 220-91 79 e 220-7279 MO: Datamarketing-Prod p/Proc de Dados Ltda -R Alagoas. 1460 - C| 903 Belo Horizonte- Fone: 225-9871 CE: JoSo Bezerta Jr -R Guilherme Ro- 
cha. 263 - Fortateza - Fone 226-9328 ES: LGC Com e Repr Ltda -R Alberto deCHiveira Santos. 42 - S/1 41 6 - Vit6na - Fone 223-1 1 24 PR: SIMIGRA - Supr e Equip p'Computacao Ltda - R 24 de 
MaK). 2937 - Cuntiba - Fone 224-9002 8C: SIMIGRA - Supr e Equip p/Computacflo Ltda - R Osmar Cunha. 1 5 - Bloco A - 8° andar - S/8 1 1 - Flonanopolis - Fone 23 1 09 1 RS: Rosa Sapoi/nvki R 
Venancio Aires. 495 - apto 62 -Porto Alegre- Fone 21-6089 MT e MS: Fortaleza - Com e Repr Ltda R Magnetita. 71 Campo Grande Fone 382-0173 SE: Antunes Repr Ltda -R Laranieiras. 1 5 1 
- 2* andar Aracaiu - Fone 222-2307 PA: ASSISTE - Informatics Ltda - Av Nazare, 272 - sals 506 - Fone 225-0060 BA: Jose Augusto Vasconcelos - R do Tira Chapeu, 06 - S/806 
Salvador Fone 243-8116 MA: ORMASiS - Org Maranhense de Sist eServ Ltda -Av Getulio Vargas. 1746- SSoLuiz- Fone 222-0217 Of e GO: OVIDEO P DE GODOY - SQS I 07 bloco K apto 302- 
Fone (0611242-1790 AM. AC. RO e RR: Cap de Dados Ltda - Av Costa e Silva. 680 - Manaus - Fone 237-1033 e 237-1 793 PE. AL. PBe RN: LUHE - Com e Repr R Dr Miguel Vieira Ferreva. 
416 Recite Fone 228-3224 Santos • CMMH Vlzlnhaa: Jose Roberto F Rodngues - R Egldio Martins. 1 49 - Ponta da Praia - Santos- Fone 36-2256 Camoinaa: DIAP Distr deArt p'Escntdrio Ltda 
R Jose Pauhno. 582 - Campinas ISP) - Fone 32-4133 



Na maioria dos micros pessoais, o 
usuario tem que conviver com uma 
scrie de limitacdes dc capacidade dc 
mcm6ria, perifericos etc No APLY 
300 isso nao acontece. 

Para comecar, o APLY 300 c o uni- 
co micro pessoal brasilciro de sua 
classe que ja incorpora interface se- 
rial RS-232C. Isso significa que ele 
pode operar com virtualmente todas 
as impressoras disponiveis no merca- 
do, alem de comunicar-se com outros 
computadores. E muito breve voce 
podera utilizar tambem duas unida- 
des de disquete c gerador programa- 
vel dc ate oito cores. 

Seu processador Z-80A e urn dos 
mais rapidos em uso no Brasil, com 
de clock de 3,25 MHz. Com a 
ampla memdria RAM de 32 ou 48 
Kbytes, voce nao precisa espremcr 
suas aplicacdes, nem fazer ginastica 
na programacao. 

Mas nao e so isso que o APLY 300 
se distingue dos demais sistcmas. No 
video, por exemplo, alem de f uncio- 
nar com qualquer TV preto e bran- 
co ou colorida, ele dispde ainda de 
um conector de SVC (Sinai de Video 
Composto) para TVs com adaptacao 
de entrada direta de video, o que per- 
mite maior nitidez de imagem. 

apply 3aa 



APPLY300: 

omais 
profissional 

dos micros 
pessoais. 



CARACTERfSTICAS 
TtCNICAS 

• Microprocessador Z80-A 

• Linguagem Basic 

• 8 Kbytes de ROM 

• 32 ou 48 Kbytes de RAM 

• 69 teclas tipo membrana 
tlcxncl. com 154 funcdes 

• Joystick, ImpresSora (RS 
232-C) 

• Video: Aparelhos de TV B e 
P ou Colorida 

• Gravacao em fita cassete 
comum 

• Feedback audit ivo no teclado 

• Bip programavel e com 
mem6ria 

• Tela para texto com 24 por 
32 caracteres alfanumericos 

• Tela para grafico com 44 por 
64 pontos graficos 

• Teclas especiais: RUBOUT, 
EDIT, GRAPHICS, 
FUNCTION, eta 

APLICAC6ES 

• Programas educacionais 

• Jogos animados 



QOBDDD 



ii«o> 



h n ca 



*> <+ i 



E para sua maior qu alidade, a fon- 
te de alimentacao. locali/ada no pro- 
prio corpo do aparelho. e capaz de 
fornecer tres tensdcs que poderao scr 
utilizadas para disposimos cxternos 
ao computador. 

Essas sao apenas algumas das ca- 
raaeristicas deste poderoso sistema. 
Venha \e-lo pessoalmenie, \oce \ ai fi- 
ido com o desempe- 
nhoc M, o mais profissio- 

nal dos micros pOHO 



MICROCOMPUTADORES 

Centra de Desenvolvimento de Sistemas 
Eletronicos Ind. Com. Ltda. 
Estrada do Galeao, 11 - sala 202 - 
llha do Governador - Rio de Janeiro - RJ 
CEP 21931 - Tel.: 396-4264 



• Jogos inteligentes 

• Estatistica 

• Calculos matcmaticos 

• Financas 

• Calculos Estruturais 

• Controle de estoque 

• Controle de conta bancaria 

• Orcamento domestico 

• Graficos 

• Programacao Assembler 

• E muitas outras aplicacdes 



Interessantes descobertas na memdria da T/-58 foram feitas por 
Robinson, de apenas 15 anos, que ainda conseguiu simular o LAST X da HP-4 1 nas TIs 



Um LAST X na TI-58C 



Robinson dos Santos Pereira 



A HP-4 1 tem uma instrucao cha- 
mada LAST X que recupera o 
ultimo x operado. Na TI nao 

possuimos esta instrucao. Entao, que tal 
tentar smtetizar ou achar um c6digo que 
sirva como equivalente ao da HP? 

£ muito dificil smtetizar alguma coi- 
sa na TI, pois a Texas utiliza apenas dois 
algansmos para formar o codigo da ins- 
trucao. Em outras palavras, 6 impossivel 
fazer uma instrucSo com c6digo 123, 
por exemplo. 

Mas nio vamos desistir. Jd que o ne- 
gbcio i cnar c6digos indditos, podemos 
aproveitar os cddigos que nao sao usa- 
dos pela calculadora. Sao eles: 21, 26, 
31, 41, 46, 51, 56 e 82. Vamos testd-los 
agora. 

— Codigo 2 1 : Digite : 

LRN 

ST0 21 

BST 

BST 

2nd 

DEL 

SST 

R/S 

LRN 
Agora teste, digitando: 

RST 

SST 

3 
Surge no visor o valor de PI. Isso 
quer dizer que o cbdigo 21 corresponde 
a funcao 2nd. 

- Codigos 26, 41, 46, 51, 56: Nao ser- 
ve m para nada, ate* agora. 



- C6digo 31: Digite: 

LRN 

ST0 31 

BST 

BST 

2nd 

DEL 

SST 

R/S 

LRN 
Agora teste, digitando: 

RST 

R/S 
visor passa para o modo LRN. 
Quer dizer que o codigo 31 corresponde 
a funcao LRN. 
-C6digo 82: Digite: 

LRN 

ST0 82 

BST 

BST 

2nd 

DEL 

SST 

R/S 

LRN 

Teste, digitando: 
RST 

R/S 

Apagara o visor, mantendo apenas o 
C no lado esquerdo durante alguns se- 
gundos. Ai surgirf um zero piscando. 
Pressionando LRN, notaremos que a 
calculadora esta com o apontador no 
passo 239 (dependendo do particiona- 
mento). Por que isso aconteceu? N6s 



nao colocamos um R/S depois da instru- 
cao 82? A unica exphcacao para isso 6 
que a instrucao 82 saltou o passo seguin- 
te, ou entao o aproveitou para endereca- 
mento. E foi isto o que aconteceu: a ins- 
trucao 82 6 como um STO ou um RCL 
que ocupa dois registros. Vamos retesti- 
la? Digite: 

RST 

32 

+ 
1 

SST 
11 

E surge no visor o niimero 32. Ai 
esti. Estamos comecando a descobnr 
coisas interessantes na TI. 

Ate" aqui estd tudo muito bom, tudo 
muito bem. Mas se testarmos SST 0... 
SST 60, ora, sao mais 61 registros, que 
somados aos 60 registros normals da 11-58 
dao 1 20 registros como na TI-59 e mais 
um que talvez seja o T-Register. Pore'm, 
so podemos usar oito registros destes 
que nos descobnmos, que sao os de 
R 1 1 ate* R 1 8. Assim, digite : 
2+(3+(43x(9-( 

Agora utilize o codigo 82 para os en- 
derecos de 11 ate - 18. 

Viu? Temos um 6timo LAST X. Po- 
rem, algumas perguntas devem ter fica- 
do na sua cabeca. Por que a Texas nao 
explanou esta instrucao no manual? Por 
que existe esta parte de mem6na na cal- 
culadora? 
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Uma coisa que acontece com a minha 
TI-58 talvez exphque esta segunda per- 
gunta. A chave hga-desliga de minha TI 
e urn pouco dura e as vezes quando eu a 
hgo e n3o puxo a chave com forca, o 
visor fica fraco e a calculadora embara- 
lha os c6digos em modo LRN. 

Outra vez, ao lig^-la, digitei 
3 2nd OP 17. No entanto, em vez de 
aparecer no visor 239.29, surgiu 719.291 
Ainda espantado, digitei GTO 719, pres- 
sionei LRN e la" estava eu, no passo 719, 
normalmente, como se tivesse em mi- 
nhas mSos uma TI-59. Testei todo o par- 
ticionamento do SIZE da mem6na e 
constatei que a calculadora nao estava 
cometendo erros. 

Na verdade, eu creio que o hardware 
da mem6na da 58 i o mesmo da 59, de- 
vendo existir urn sistema operacional 
que deve barrar o uso mtegral da mem6- 
na na TI-58. 

Bern, esse 6 o meu palpite. Nao sei se 
esta" errado ou certo, mas estou esperan- 
do que voces pesquisem esta situacSo 
para podermos discutir. Espero que 
aproveitem bem o LAST X que desco- 
bnmos. H 



Robinson dos Santos Pereira tern 15 anos e 6 
estudante do Col4gio Mil i tar do Rio de Janei- 
ro na 1 a S4rie do 29 Grau. Robinson tambim 
atua como Monitor no Curso de Programacao 
de Micros do Col6gio. 



Nao pare seu programa 
nem perca a memoria 



Gerador Eletronico Portatil de 200 VA 




GUARDIAN 



Gerador Eletronico GERATRON 

e a solucao definitive para 

o problema de falha na reoe 

eletrica. Quando esta (altar. 

GERATRON continuara alimentando 

o seu micro como se nada 

houvesse acontecido. Chame 

um representante hoje mesmo 



iy Equipamentos Eletronicos Ltda. 

ALTA TECNOLOGIA EM ELETRONICA INDUSTRIAL 

RuaDr Gamier. 579 • Rocha • CEP 20971 • RJ • Tels <02t) 201-0195 261-6458 e 281-3295 • Telex (02t) 34016 

• Sao Paulo (01 1) 270-3175 e 241-751 1 • Brasilia (061) 226-0133 • Salvador (071) 241-2755* Recite (081) 221-0142 

• Natal (084) 222-3212 • Belem (091) 222-5122 • Forlaleza (085) 226-0871 •Cur.tiba (041) 224-5616 

• Flonanopolis (0482) 23-0491 • Blumenau (0473) 22-6277 • Porto Alegre (0512) 22-5061 



Computodor que se prezo 
nao dispense um prato-feito. 



Programas para D 8002, CP 500, 
DGT 100, TRS 80, NAJA, JR 
e outros. Temos disponfveis 
mais de 50 programas para os 
micros acima e outros de maior 
porte. Consulte-nos. 




• Antes de comprar seu computador soli- 
cite nossa assessoria, sem compromisso, 
para analise, implantacao e apoio. 

• Desenvolvemosqualquertipode softwa- 
re espeeffico, de acordo com as necessi- 
dades de sua empresa. 

• Descontos para revenda. 

• Atendimento por reembolso para todo 
o Brasil. 



Software : o alimento mais nutritivo paro seu comj 



TABELA DE PREQOS - PROMOQAO ESPECIAL (Cr$) 



Programs 



Contabilidade 

Folha de Pagamento 

Controle de Estoque 

Mala Direta 

Mala Direta c/Ed. Texto 

Contas a pagar/receber 

Tesouraria 

C red iar io (p/ D 8002) 

Admin, do Imoveis 

Editor de Texto 



Fita Diskete 



16-92T 

43086 
32.315 

32.315 



21.543 



161.575 
64.630 

107.716 
80.787 

134.646 
80.787 
80.787 
85.000 

296.221 



Programs 



Controle de Custos 

Arquivo de Processos 

Controle de Livros 

Controle de Cheques 

Biorritmo 

Oecisao 

Obstaculo 

Kit Maternal. c/4 progr. 

Jogos Americ.(Fitac/4) 



Fita 



26.929 
16157 
13.464 
13.464 
10.771 
11.848 
10.771 
43.086 
15.000 



Diskete 



16.771 
17.848 
16.771 
49.086 
21.000 



CURSO DE BASIC 

"Turma limitada: maximo de 10 alunosN 

De 2? a 5- a feira. de 19 as 21 ,30 h. 

(20 h./aula). Aulas praticas. 
apenas 2 pessoas p/ computador 



A/temo/ 

Av. Rio Branco. 45 gr. 1311 - CEP 20090 
Tat.: (021) 263-1241 - Rio da Janeiro 



Voce" tamMm encontra esses programas em nossos revendedores credenciados. 
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SOFTWARE 

• Vendo programas para TK85: 
Folha de Pagamento, Agenda de 
Telefones, Controle de Estoques, 
Contas a Pagar/Receber, Fluxode 
Caixa, Mala Direta, Processamen- 
to de Texto, Controle Bancario, 
Cadastro Clientes, Contabilidade 
Domestica, Orcamento Domesti- 
co. Tratar com Bete pelo tel.: 
(01 1 ) 284-5635. 

• Vendo ou troco 160 progra- 
mas em fitas cassete: aplicativos, 
comerciais e jogos animados, na- 
cionais e importados, de 2K e 
16K para os micros: TK82-C, 
NE-Z8000. ZX 81. TK85 ou CP- 
200. Carlos Sciarretti, Cx. Postal 
5567. CEP 01051, Sao Paulo. 
SP, tel.: (011) 522-8586. 

• Vendo ou troco programas de 
jogos para oTKe similares de ZK. 
Aos interessados tratar com Pedro 
Antonio, Rua Barata Ribeiro, 18/ 
1004. Copacabana, R J, tel.: (021) 
275-3612. 

• Vendo programas para os mi- 
cros TK82-C. CP-200, NE-Z8000. 
ZX-81 . Aos interessados solicitar 
lista com Renato Strauss, Rua 
Cardoso de Almeida. 654/32, CEP 
05013, Sao Paulo, SP. 

• Vendo diversos jogos em lin- 
guagem de mdquina para o TK82- 
C e TK85. Tratar com Marco An- 
tonio pelo tel.: 225-7507, Belo 
Horizonte, MG. 

• Vendo e troco programas para 
o TK82-C. Aos interessados, en- 
trar em contato com Moys6s Al- 
ves de Lima, Rua Jose Amancio 
Ferreira, 23, Taboao da Serra.tel.: 
491-6816 (residdncia) ou 66-0342 
(comercial), SP. 

• Vendo 90 programas importa- 
dos para CP-200 e TK82-C; jo- 
gos como o King-Kong do f lipera- 
ma, aplicativos, etc... Tratar com 
Junior, Av. Senador Vergueiro, 
2685, Bl. 11-A, apt. 104 ou 132, 
Rudge Ramos, Sao Bernardo do 
Campo, Sao Paulo ou pelo telefo- 
ne:(011) 449-3424. 

• Vendo programas de origem 
europeia para TK82, TK85, CP- 
200 e NE-Z8000, lacrado em plis- 
tico. Cada fita custa Cr$ 4 mil e 
500. Tratar com Alexandre pelo 
tel: (011) 203-4277, SP. 

o Vendo programas como Othel- 
lo, Asterdides, Gamao, Pacman, 
Flight Simulator e outros para o 
TK82-C e seus similares. Todos os 
programas sao gravados em fita 
magnetica. Tel.: (021) 226-8089, 
Rio de Janeiro, Alexandre. 

• Vendo programa de Andlise 
Estrutural (Pdrticos, Trelicas e 
Vigas Continues) para HP-85. Tra- 
tar com Mario Miyake pelo tel.: 
(011) 228-6611 (dia) e 570-1520 
(norte). 

• Vendo para IBM, com docu- 
mantacab original: VisiCalc, 
Wordstar e Mailmerge. Eleonora, 
Aw. Borges de Medeiros. 3535/ 
104,ttl.:(021) 286-3680. RJ. 



EQUIPAMENTOS 

• Vendo micro de bolso FX 702 
P e FX 802 P. Linguagem BASIC, 
com gravador acoplado, impresso- 
ra e interface. Acompanham pro- 
gramas e manuais. Tratar com 
Rubens pelo tel.: (01 1 ) 455-1940, 
SP. 

• Vendo TK82-C, com expans3o 
de 16K, vi'deo direto e inverso e 
funcSo SLOW. Preco Cr$ 120 
mil. Ofereco os programas T-Kalc, 
Editor de texto para TK e SIN- 
COM. Telefonar para 350-3118, 
deixando endereco ou telefone 
para contato. 

• Vendo Xadrez Eletronico, sete 
nfveis de dificuldade. Acompanha 
esquema, programa listado e ma- 
nual de instruca"o. Tudo por Cr$ 
60 mil. Tratar com Ivo Dornas, 
Cx. Postal 20511, Tijuca, Rio de 
Janeiro. 

• Vendo HP-75C, cassete, video, 
interface e impressora. Maiores in- 
formacdes pelo telefone (01 1 ) 
276-4622, SP. 

• Vendo um TK82-C, com ex- 
pansa"o de 16 K, ainda na garantia. 
Tratar com Annette Dreyer, Rua 
S3o Jose, 70, tel.: (021) 224-9788 
(hora>io comercial). 

• Vendo um CP-200, com instru- 
c3o em Linguagem BASIC, semi- 
novo, na garantia. Tratar com Ro- 
naldo, tel.: (021) 259-9424, RJ. 

• Vende-se HP-41CV, impresso- 
ra, leitora (dtica e magnetica), ba- 
terias, papel tdrmico, cartdes, ma- 
nuais em portugues. Tel.: 239- 
9118. Tratar com Eduardo as 
21:00h,RJ. 

• Vendo Sinclair ZX-81 (Timex 
1000), com expansao de 16 K, 
cinco programas originals e um 
jogo de xadrez Sensory Chess 
Challenger (americano), tudo na 
embalagem. Tratar com Carlos, 
tel.: (01 1)221 -8082, a nohe. 

• Vendo computador Prologica 
S 700, com impressora. Tratar 
com Dr. Eduardo Raful. Tel.: 
(0192) 32-1919, Campinas, SP. 

• Vendo uma calculadora Texas 
TI-59, com impressora, incluindo 
vdrios programas de Engenharia 
Civil, cartdes magneticos e rolos 
de papel te>mico. Preco de 350 
mil, ou troco por um microcom- 
putador. Tratar com Leonardo 
Matuda. Rua Bolivia. 400, tel.: 
254-5430, Curitiba, Parana. 

• Vende-se HP-97, sem uso, por- 
tatil (bateria recarrega"vel, pro- 
grama"vel, leitor/gravador p/dados 
e programas), impressora para saf- 
da de resultados e listagens de 
programas. Acompanham manu- 
ais, conjunto de 18 programas 
(matemSticos, financeiros, etc), 
cartdes virgens, carregador de ba- 
terias para 110/220. Preco: Cr$ 
550 mil. Informacoes nos tels.: 
(021) 262-9513 (Suely); (061) 
226-3558 (Vera); (011) 222-0229 
(Selma). 



• Vendo micro NE-Z8000, com 
expansao de 16 K, novfssimo. 
Acompanha manual de instrucdes 
eihas com os jogos Labirinto Tri- 
dimensional e Demolidor. Tratar 
com Gerson Ferreira Pinto, Av. 
Pio XII, 350, Campinas, SP. 

• Vendo um JR Sysdata, 16 K, 
com mais 2 K de expansao; pra- 
ticamente sem uso; otimo preco 
devido a urgentia: Cr$ 295 mil, 
sem contra -oferta. Tratar com 
Sergio, tel: 275-4007, S3o Paulo. 

• Vendo um computador da 
Proldgica, modelo CP-500, com 
48 Kbytes e um drive. Tratar com 
Laerte Rosselli na Rua Piratinin- 
ga, 449, SSo Caetano do Sul, SP, 
tel.: (011) 453-9449 ou 442- 
7595. 

• Vendo xadrez eletrdnico com 
diagrama esquema"tico completo. 
Chess Challenger Americano, com 
micro ZX80 A, sete ni'veis. De- 
senho do circuito impresso, pro- 
grama completo, opcao EPROM 
gravada. Somente Cr$ 2 mil e 
500. Tratar com Antonio pelo 
tel.: 254-6815 ou 263-3171, RJ. 



DIVERSOS 

• TRS DOS ou compati'veis: tro- 
co logotipo e coloco sua mensa- 
gem. Nilson, tel.: (021) 392-8977. 

• Expande-se hardware de DGT- 
100, tornando-o aplicaVel ao uso 
cienti'fico e tecnologico. Cx. Pos- 
tal 14717, Ipanema, RJ. 

• Compro revistas MICRO SIS- 
TEMAS do n° 1 ao n9 14, pago 
preco atual. Interessados liguem 
para (021) 225-5511, Pedro, apds 
as 17:00h. 

• Ofereco servicos de consulto- 
ria, program aca"o e aneiise para 
HP-85, nas areas Administrativa, 
Tecnico-cientffica e comercial. 
Preco ma"ximo (para grandes siste- 
mas) = 20 ORTN's; mfnimo =3 
ORTN's. TamMm compro livros 
tecnicos (novos ou usados), em in- 
gles ou portugues, principalmente 
sobre hardware e programacao 
COBOL/BASIC. Tratar pelo tele- 
fone (021) 266-4852 rl.: 398 ou 
Rua Vise. Ouro Preto, 5, 139 an- 
dar, Botafogo, Rio, CEP 22250 
(Daniel Vieira). 




• Procuro pessoas interessadas 
em trocar informacdes sobre de- 
senvolvimento de programas de 
ensino de matematica para crian- 
cas. Tratar com Silvio Vasconce- 
los no sguinte endereco: Rua Ta- 
bapu§, 266, apt. 31, Sao Paulo, 
CEP 04533 ou pelo tel.: (011) 
64-5001 . 

• Tenho o "Users' Library" de 
jogos e procuro quern tenha o de 
matematica e/ou o de Eng. Solar, 
pois necessito de alguns progra- 
mas existentes neles. Paulo Bas- 
tian Krouwel, Rua Antonio Salo- 
mon, 162, 37500, Itajuba, MG. 

• TIGER CLUBE - Estamos 
formando um grupo de usuarios 
do TRS-80 III, CP-500 e similares. 
Consulte-nos e receba todas as in- 
formacoes gratuitamente. Cx. 
Postal 23095, Rio de Janeiro, RJ, 
CEP 20922. 

• Possuo um DGT-100, 16 K, 
versa"o cassete e gostaria de me 
corresponder com usuarios desse 
equipamento, para troca de pro- 
gramas (jogos aplicativos em ge- 
ral). Escrevam para Rodrigo Cesar, 
Rua Cel. Pedro Dutra, 212, Balr- 
ro Jaragua", Belo Horizonte, MG, 
CEP 30000. 

• Gostaria de entrar em contato 
com Radioamadores que estejam 
utilizando os micros de tecnologia 
Sinclair, para decodificar CW e 
Rtty. Interessados escrever para 
RADIOMICRO, o primeiro grupo 
brasiieiro de Radioamadores digi- 
tals do Brasil. Informacdes com 
Renato Strauss, Rua Cardoso de 
Almeida, 654/32, CEP 05013, 
Sao Paulo, SP (PY2-EMI). 



• Gostaria de informacdes sobre 
a linguagem de maquina do TK82- 
C. Escrevam para Luis Rogerio 
Dupont, Rua Arthur Leopoldo 
Ritter, 164, Estancia Velha, RS, 
CEP 93600. 

• Procuro pessoas interessadas 
em me fornecerem dicas, mace- 
tes e at£ mesmo programas em 
BASIC, o que eu procurarei retri- 
buir. Escreva para Sergio Tajal, 
Rua Carlos Von Koseritz, 261 , Hi- 
giendpolis, Poa, Rio Grande do 
Sul. 

• Aos usuarios do VIC 20 e Co- 
rn odo re 64:' Acabamos de lancar 
o primeiro clube Comodore do 
Brasil. Temos muitas dicas. servi- 
cos de reparo e reposicao. muito 
software para troca e estamos or- 
ganizando uma biblioteca com li- 
vre acesso (modem, carta ou pes- 
soalmente). Associem-se ao nosso 
clube, cuja unica finalidade e o in- 
tercambio de material para os 
computadores citados. Estamos a 
seu dispor para maiores informa- 
coes no CSI — Comodore Soft- 
ware Interchange, Rua Haddock 
Lobo, 1663/122, Jardim America, 
Sao Paulo, CEP 01414, ou pelo 
telefone: (01 1)282-7068. 

• Tenho um Texas Instruments 
99/4A e um Sinclair ZX Spectrun 
e gostaria de manter contato com 
pessoas que possuam o mesmo 
equipamento para intercambio de 
programas. Ian Gordon Hall Dun, 
Cx. Postal 05, Jacupiranga, SP. 

• Boletim-Clube para os usuarios 
de TK/NE/CR. Anuncios gratis. 
Informacdes: Grande Circuito, 
Cx. Postal 28, CEP 27200, Piraf, 
RJ. 
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Vida de executivo e dura. Passa o dia todo fazendo 
coisas cansativas como calcular juros. balanco, 
balancete, ORTN, IPI, ICM, INPC etc. Felizmente, ^ 
a Texas Instrumentos lancou a BA-55: a mais 
avancada calculadora financeira- 
estatistica programdvel. A BA-55 executa 
urn niimero incalculdvel de operacoes: valor 
presente, valor futuro. taxa interna de retorno, 
fluxos de caixa, desvio padrdo, conversdo 



v«J 



de taxas. regressdo linear; o que voce quiser. Adicione c 

isso 5 memorias, 32 passos de programas, duas bateria: 

com 2000 horas de duracdo e urn opcional muito util: c 

impressora PC-200, que pode ser acoplada a sua cal 

k culadora. So por ai jd da para calcular o tempo que 

%k sobra para voce pegar uma sauna, tomar seu chq 

pinho ou, melhor ainda, tazer isso mesmo que voce 

estd pensando. Nova BA-55 da Texas Instrumentos 

V Relaxeeaproveite. 






%<$> 
>* 




Texas Instrumentos 

Com Essa Mdc6 Pode Contar. 



O depoimento de varios usuarios sobre a importancia dosjogos em computadores 
e sobre os problemas de sua programacao 



A programacao de jogos 



Nao hi quern possua urn micro 
pessoal que nao dispute suas 
guerrinhas espaciais de vez em 

quando. Alguns ate* compraram o mi- 
cro justamente para isso, seja pela ansia 
do modismo, seja pela labia do vende- 
dor. certo 6 que a industria do lazer 
eletronico e* uma das mais rentaveis da 
area de Informatica e isto pode ser fa- 
cilmente sentido no Brasil. 

Mas como e programar um jogo? 
Existem te*cnicas especiais de programa- 
ca"o? Qual a melhor linguagem a ser uti- 
iizada? Programar um jogo e* diferente 
da programacao dita "seria"? Jogar com 
um micro e" alienante? 

Tentando mostrar um pouco do ou- 
tro lado dos programas de jogos, MI- 
CRO SISTEMAS fez estas e outras per- 
guntas para varios usuarios de micros 
Pessoais que se interessam de uma ma- 
neira ou de outra pelos jogos em compu- 
tadores. Ale'm disso , mostramos os jogos' 
mais vendidos nas lojas do Rio e Sa"o 
Paulo e apresentamos os videogames, 
equipamentos especificos para jogos. 

PROGRAMAS DE JOGOS 

Ha varios tipos de jogos para micros 
pessoais. Basicamente, temos os jogos de 
animacSo (guerras espaciais, corridas de 
carro e jogos esportivos); os jogos de es- 
trategia (adventures); os jogos tradicio- 
nais simulados no computador (Xadrez, 
GamSo, Cartas etc) e os jogos educati- 
vos, do tipo "aprenda brincando". 

A maioria das lojas especializadas es- 
tab repletas de programas de jogos — es- 
trangeiros em sua esmagadora maioria — 
em fitas cassete ou em disquete, cobrin- 
do praticamente todas as linhas de mi- 
cros. Seus precos variam conforme a 



procedencia e o meio onde esta armaze- 
nado. Por exemplo, um programa em 
cassete nacional (jogos estrangeiros 
adaptados ou copiados por empresas 
brasileiras) custa em me'dia Cr$ 10 mil; 
se a fita for importada, seu preco vai 
para perto dos Cr$ 20 mil, e se o jogo 
estiver em disquete o acre*scimo sera 
ainda maior, devido ao proprio pre go do 
disquete flexivel. 

Os jogos comerciais geralmente sSo 
muito bem feitos e impressionam pela 
apresentacao no video. Eles utilizam-se 
largamente da linguagem Assembler, fa- 
zendo sub-rotinas ou o programa intei- 
ro nesta linguagem, de modo a permitir 
rapidez, qualidade e alta resolucfo gra- 
fica na animacSo. Entretanto, nada im- 
pede que um usuario faca em seu pr6- 
prio micro um bom jogo usando BASIC, 
sem ficar devendo em nada aos bons 
programas profissionais. 

BOM PARA O INICIANTE 

Teoricamente, qualquer pessoa que 
tenha uma experiencia minima na pro- 
gramacSo de uma linguagem como o 
BASIC pode fazer seus pr6prios jogui- 
nhos. 

Mas, sera ta*o simples assim? 

Newton Braga Junior, Gerente da lo- 
ja carioca Rio Micro e proprietario de 
um DGT-100 e de um TRS Pocket Com- 
puter, acha que programar um jogo re- 
quer muito tempo e conhecimento dos 
recursos da maquina, principalmente pa- 
ra a animacSo de figuras e para simular 
determinadas fungOes que nSo constam 
dos repertorios de comandos das lingua- 
gens tradicionais. Newton come?ou a 
usar micros (um NE-Z8000) fazendo 
programas de jogos. "Eu acho que o 



software de jogo 6 um grande passo pa- 
ra quern quiser passar depois para uma 
programacao mais s^ria, porque ele puxa 
muito do programador. Ale'm disso, nao 
e uma programacSo rigida: 6 bem fle- 
xivel e criativa", comenta ele. 

Outro aficcionado e profundo conhe- 
cedor de micros, o desenhista industrial 
Renato Degiovani, e autor errtusiasta de 
varios jogos para o TK82-C, alguns ji 
publicados em MICRO SISTEMAS 
(Aeroporto S3, Aventuras na Selva). Em 
termos de te*cnica de programacao, De- 
giovani acha que o mais importante na 
hora de programar um jogo 6 saber usar 
o video. "0 visual 6 muito importante", 
conta ele. "N2b adianta voce querer for- 
car o usuano a aceitar um simples X pa- 
rado num canto como um perigoso inva- 
sor espacial que ele nao vai engolir. Ago- 
ra, se este X se movimentar rapidamen- 
te, apagar-se num lugar para reaparecer 
de surpresa em outra parte do video ou 
mesmo ao lado de seu canhSo, ai sim o 
usuario 'sentird' um invasor personifica- 
do nele". 

Renato tambe"m acredita que progra- 
mar um jogo nao 6 facil. "Um bom pro- 
gramador profissional nem sempre fori 
um bom jogo. £ preciso ter muita sen- 
sibilidade e conhecer profundamente a 
parte de video da maquina". 

"Antes de fazer um jogo,eu imagino 
na minha cabe9a como ele sera e dai 
parto para escrever o programa". Bruno 
Barrasch, 18 anos e reee'nHngresso num 
curso de Engenharia em Sao Paulo, acha 
que os jogos em computadores podem 
auxiliar bastante quern esta comegando, 
pois atravds deles se aprende a lingua- 
gem e os recursos da maquina. "Nos jo- 
gos dinamicos", conta Bruno, "6 essen- 
cial que o programador conhega os re- 
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cursos graficos e as 'manhas' da maqui- 
na para obter maior velocidade. J a nos 
jogos de inteligencia, os adventures, 6 
preciso dominar a mem6ria da mdqui- 
na e suas funcOes. Nos dois casos, de 
qualquer maneira, tern que se conhecer 
muito bem a linguagem que se esta" uti- 
lizando" 

DINAMICA 

Estudante de Engenharia da Grande 
Sa"o Paulo como Bruno, Fdbio da Cunha 
ha alguns anos programa micros e 
calculadoras e recentemente esteve nos 
Estados Unidos para participar de uma 
se'ne de cursos de hardware e software 
para micros. Ele ve a elaboracSo de um 
jogo como uma tarefa met6dica. "Para 
programar um jogo", conta ele, "em pri- 
meiro lugar voce tern que ter uma boa 
ide*ia do que quer do jogo. Depois i que 
voce comeca a detalhar mais os aspectos 
gerais, passando entao para as partes 
bem especificas, como contagem de 
pontos etc. Quando eu escrevo um pro- 
grama de jogo, faco um algoritmo bem 
em cima da linguagem que estiver usan- 
do, para ter certeza de que a 16gica esta 
correta". 

Para Fdbio, existe uma grande dife- 
renca entre programar um jogo e a pro- 
gramacSo normal. "Num programa co- 
mercial, voce tern muito menos coisas 



para se preocupar, porque ele tern um 
comportamento bem definido. Num jo- 
go, existem muitos fatores, sendo o 
principal a dinamica: um bom jogo tern 
que ser atrativo, nao ser cansativo e deve 
oferecer ao final uma sensacSo de bem- 
estar para o jogador; de conquista mes- 
mo" 

UMA BOA IDfilA 

"(...) Todo jogo parte de uma lddia. 
Escreva-a! Coloque no papel os objeti- 
vos e caracteristicas basicas que voce de- 
seja ver no jogo, regras de utilizacao, re- 
cursos a serem utilizados etc", (extraido 
do artigo Anime-se ... e faca bons jogos 
em BASIC, MS n9 23, agosto/83). 

Renato Sabbatini, me'dico, professor 
universitario e profundo conhecedor de 
microcomputadores, surpreendeu a mui- 
tos leitores de MICRO SISTEMAS - 
que ja o conheciam pelos seus artigos so- 
bre o uso de micros na Medicina — ao 
publicar um artigo com dicas de amma- 
ca"o graTica em BASIC para uso em jo- 
gos. Sabbatini diz gostar muito de pro- 
gramar jogos educativos para qualquer 
faixa etana e acha que no Brasil poucos 
conseguiram alcancar o nivel dos paises 
estrangeiros na elaboracao de progra- 
mas de jogos para micros pessoais. "Na 
Europa, Estados Unidos e Japao existem 
laboratorios de pesquisa com te'cnicos 



trabalhando exclusivamente em jogos". 
conta ele. 

Renato Sabbatini concorda que para 
programar um jogo 6 necessano um bom 
aproveitamento dos recursos da maqui- 
na ("a dinamica e muito grande") mas 
discorda quando ouve falar que os jo- 
gos sa"o alienantes. "£ o contrano". 
ele comenta, "se fossemos considerar os 
jogos alienantes poderiamos colocar a 
leitura e o cinema no mesmo nivel, pois 
sa"o atividades sobtdrias. jogo, mesmo 
quando executado por uma so pessoa,e" 
estimulante e gratificante; quando parti- 
cipam varios jogadores, ele passa a ser so- 
aalizante, pnndpalmente entre cnan- 
cas". 

Outra afirmacao comum, de que os 
jogos aumentam a agressividade das pes- 
soas, tambdm e' recha?ada por Sabbati- 
ni. "Hi vdrios estudos de Psicologia que 
provam que os jogos esvaziam a agres- 
sividade, pois sa"o usados como um esca- 
pe natural", conta ele. "£ 16gico que ja 
apareceram alguns jogos que poderiam 
ser pengosos, mas logo foram proibidos, 
como aquele em que o alvo era um m- 
dio e provavelmente estimularia o racis- 
mo". 

Engenheiro Kazimierz Malachows- 
ki, de Sao Paulo, concorda com Sabbati- 
ni. Proprietano de um TK82-C e autor 
do jogo Jornada nas Estrelas, publicado 
nesta edicao, Kazimierz acha que os jo- 



■ Software para Microcomputadores? I 
So ha uma solucao inteligente! 
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Voci 



BIBLIOTECA BRASILEIRA DE SOFTWARE 



Todas as categorias de Software 



Diversoes 
e Jogos 
Pessoais 



Uso Caseiro 

Comerciais 
Graficos 



E..., mais de 4000 originais 



que voce pode retirar 
e levar para 
suacasaou 
empresa para 
usa-lo a vontade. 



Para os principals 
micros do mercado: 
TK82, TK83, TK85, 
T1MEX/SINCLAIR, 
CP200, CP300, CP500, 



Educacionais 
Profissionais 
Cientrficos 



TRS80 Mod. Ill, 
UNITRON, MAXXI, 
Microengenho, 
Apple e Similares, 
Sistema 700 e Superbrain. 



Voci pod* consultar pessoalmente os catalogos de Software ou solicitar inf ormacoes pelo Correio. 

Brigadeiro Faria Uma, 1390 - 8f Andar - Cj. 82 - CEP 01462 - Tels.: (011) 814-0682, 813-6407 e 210-1257 - Sao Paulo - SP 
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A PROGRAMAQAO DE JOGOS 



gos de computador tanto podem ser 
ahenantes quanto educativos. "Quando 
sffo repetitivos e viciadores, eles alie- 
nam. Os educativos, pordm, desenvol- 
vem os reflexos motores e, dizem, ate" a 
inteligencia. Mas", completa Kazimierz, 
"nfo hi como negar a importancia do 
computador como meio de comunica- 
cfo e, como todos os meios, ele precisa 
ser usado com uma certa dose de cuida- 
do". 

Jd o Engenheiro, Fisico e Professor 
da UNESP, Antonio Eduardo Costa Pe- 
reira, compara a agressividade dos jogos 
com a do cinema, "pois os filmes tam- 
be'm podem agredir. Hd agressividade em 
todas as areas", comenta ele, "depende 
apenas de quern a produz. Eu uso jogos 
na educacfo e por isso nfo posso con- 
si derd-los agressivos e muito menos alie- 
nantes, por experiencia propria". 

Prof. Antonio Costa 6 um dos pou- 
cos programadores brasileiros que utili- 
zam a linguagem Forth regularmente. 
Forth e* considerada como a melhor lin- 
guagem para a programacf o de jogos (os 
jogos da Atari, por exemplo, sfo quase 
todos em Forth), com o que concorda 
Antonio Costa. "Eu prefiro o Forth pela 
praticabilidade que ele oferece. Em rela- 
cfo ao BASIC, o Forth possibilita uma 
economia de mem6ria quatro vezes maior 
e sua velocidade em calculosnumdricose 
10 vezes maior. Para o Assembler, ele s6 
perde em velocidade, enquanto ganha 
em mem6ria". 

POUCAS NOVIDADES 

Comentando uma frase do Prof. An- 
tonio Costa ("... Quase todos os jogos 
existentes sfo adaptacdes de outros e 
poucas sfo as ide*ias novas"), Renato De- 
giovani fez alguns comentfrios impor- 
tantes. Eis seu depoimento: 

"Na reahdade, voce nfo tern mais do 
que uns dez jogos diferentes. Por uma 
questfo de mercado, eu acredito, a 
maioria 6 uma variacfo para melhor ou 
pior de alguns jogos consagrados como 
o Space Invaders, o Labirinto e o Pack 
Man, entre outros. No caso do Brasil, 
temos ainda o problema das adaptacoes 
de jogos estrangeiros, que trazem de- 
terminadas situacoes que nfo encontram 
uma identidade em nossa cultura. Por 
exemplo, no Brasil um terreiro de ma- 
cumba e" muito mais sinistro do que um 
castelo mal-assombrado. Mas todos sabe- 
mos quantos jogos n6s, que nunca tive- 
mos castelos, vemos por ai utilizando 
este tema. ideal 6 que coloquem os 
programadores para criar jogos dentro 
de nossa reahdade e nfo apenas para 
descobrir como se copia. Afinal, se voce 
paga algue'm para traduzir do ingles, 
por que, ao inve's, nao paga para criar?" 



Degiovani chama a atencfo ainda pa- 
ra uma sutil subversfo de valores soaais 
nos jogos. "0 jogo e" um mundo diferen- 
te, onde os valores sfo manipulados de 
maneira imperceptivel. O jogador algu- 
mas vezes se sente um Deus dentro do 
universo, podendo decidir sobre a sorte 
de outros seres sem nenhum escrupulo. 
Numa corrida de Formula 1 , o cara pla- 
neja com todos os detalhes um desas- 
tre que podera" matar vdrios pilotos. To- 
dos os jogos sfo, na realidade, uma cons- 
tante luta do jogador contra sua pr6- 
pria morte e pela destruicfo de seus an- 
tagonistas. Veja por exemplo, um pro- 
grama de guerra espacial: quanto mais 
bomta for a explosfo, quanto mais es- 
tilhacos e mais mortes ela tiver, mais in- 
teressante ela seraT' 

Livros sobre Jogos 

Nas principals livianas do Rio e Sao 
Paulo, nossa pesquisa encontrou os se- 
guintes titulos sobre o assunto Jogos: 

AHL, BASIC Computer Games, 1978 

AHL, More BASIC Computer Games 
(TRS-80 Edition) 

BLOOM, Video Invaders, 1982 

CHANCE, 33 Challenging Computer 
Games for the TRS-80/Apple/ 
PET 

COLE, Murder in the Mansion and 
other Computer Adventures in 
Pocket BASIC for the TRS-80, 
1981 

FISHER, PET Fun and Games, Selec- 
ted Cursor Programs 

FRANKLIN, Golden Games for the 
Apple Computer, 1982 

HEISERMAN, How to design & build 
your own custom TV Games 

HERGERT, Apple Pascal Games, 1981 

HORM, 34 More Tested ready to run 
game programs in BASIC, 1981 

KOHL, Atari Games and recreation, 
1982 

McINTIRE, The A to Z Book Compu- 
ter Games: 26 exciting and ins- 
tructive programs 

NAHIGIAN, Computer Games for the 
TRS-80, 1981 

OGLESBY, PET Fun &Games, 1981 

REESE, Simulation games and lear- 
ning activities kit for the ele- 
mentary school 

SKIER, Beyond Games: Systems soft- 
ware for your 6502 Personal 
Computer 

TRACTON, 24 Tested ready to run 
game programs in BASIC, 1978 

CHIU, Crunchers: 21 simple games 
for the Timex/Sinclair 1000 
2K 

Texto : Paulo Henrique de Noronha 
ApuraoSo SP: Stela Lachtermacher e Claudia 
Salles Ramalho. 




Os Simuladores de Vdos ndo sdo propria- 
mente jogos, mas sim programas que simu- 
lam o voo em um avido, com todos os requi- 
sitos te'cnicos para se navegar nos ceus. Nor- 
malmente, 4 necessdrio que o usuirio saiba 
as regras bdsicas para se pilotar um avido de 
modo a aproveitar inteiramente o "vdo". 
Porim, todos os jogos costumam trazeruma 
farta documentacdo para ser estudada e per- 
mitir que qualquer um decole mesmo sem 
ter tirado breve e hd tambim os programas 
'7nstrutores", que sdo simuladores para, 
aprendizagem de voo. 

No Rio e em Sdo Paulo sdo encontrados 
simuladores para as linhas Sinclair (em fita 
importada), TRS-80 e Apple, este Ultimo 
com alta resolucdo grdfica e cores. 




O TKMAN e" uma versdo do famoso Pack 
Man para os micros da linha Sinclair, e 4 
comercializado no Brasil pela Microsoft 
(Microdigital) . O objetivo do jogo 4 des- 
truir os pontos que estdo no labirinto pas- 
sando por cima deles, sem esbarrar nos 
monstrinhos que o perseguem para destrui- 
lo. Voce poderd passar pelos monstros ape- 
nas oito vezes antes que o jogo acabe e, se 
tiver reflexos para tanto, poderd afastd-los 
para um dos extremos do labirinto utilizan- 
do-se de um canhdo laser, que tern energia 
limitada. 

Hd quinze diferentes tipos de labirintos 
e vdrios nfveis de dificuldade, que vdo au- 
mentando d medida que se fazem mais pon- 
tos no jogo. 
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Os mais vendidos 

MICRO SISTEMAS fez uma ripida pesquisa entre as principals lojas do Rio e 

Sao Paulo para ver quais sao os jogos mais procurados para micros pessoais. 

No Rio, foram procuradas as lojas Computique, Ipanema Micro, Garson, Kristian, 

Micro -Kit , Clappy, Microcenter e Nasajon Sistemas; em Sao Paulo, a 

Computerland. Compushop, Microshop, Audio e Imares. 








§3 Bs->-^ m- 



No Cosmic Fighter voce 4 obrigado a re- 
sistir ao ataque de alienigenas que fleam flu- 
tuando no seu c4u ate" que surja sua nave- 
mde para recolhe-lo a bordo, sdo e salvo. 
De vez em quando, voce tambim ird sofrer 
o ataque de uma poderosa nave inimiga, 
mais rdpida e precisa que as outras, exigindo 
de voce muita atencdo para ndo ser elimi- 
nado. Al4m disso, quando sua nave-mde apa- 
rece para salvd-lo, esta poderosa nave inimi- 
ga ird colocar-se entre ela e voce, numa ulti- 
ma tentativa para destrui-lo. £ o momento 
culminante do jogo. O Cosmic Fighter 4 en- 
contrado em versao para a linha TRS-80 nas 
lojas do Rio e Sao Paulo. 



Dentre os jogos mais procurados para 
micros, pessoais de todos os modelos, estd o 
Xadrez. lid vdrias versoes no mercado, como 
o Microchess 2.0 (na foto), o Saigon II, o 
TKADREZ (para a linha Sinclair ZX81), e 
muitos outros. Um programa de Xadrez 
consiste em fazer do computador um par- 
ceiro frio e paciente para jogar com o ser 
humano. Normalmente , hd vdrios m'veis de 
diflculdade, do iniciante ao expert, e opcoes 
para: iniciar uma partida, de brancas ou de 
pretas; comecar a jogar a partir de uma de- 
terminada posicao; colocar um problema pa- 
ra o computador resolver; imprimir a parti- 
da rec4m-jogada; guardar em disquete ou 
fita um jogo interrompido para posterior 
continuacdo etc. 




No Sabotagem voc4 tern que defender 
sua base anti-airea do ataque de helicdpte- 
ros inimigos que ddo rasantes, bncando pa- 
ra-queuistas sabotadores sobre sua posicao. 
Sempre que voci deixar que mais de tres pd- 
ra-quedistas cheguem com vida ao chdo, sua 
sorte estard selada, pots uma invencivel 
equipe de sabotagem estard formada e logo 
sua base ird pelos ares. 

Mas ndo 4 s6 : apds atingir 50 pontos, sur- 
girao os bombardeios com proj4teis rdpidos 
e precisos e, se mesmo assim voce teimar em 
resistir, os helicdpteros voltardo com uma 
verdadeira chuva de pdra-quedistas que irdo 
the dar bastante trabalho. 



O Galaxy Invaders 4 o jogo mais procura- 
do no Rio t em Sao Paulo para os micros da 
linha TRS-80 (CP-500, DGT-100 etc). O Gal 
(como 4 conhecido nas lojas) 4 na verdade 
uma versao do famoso Space Invaders. A 
diferenca 4 que os invasores ndo vdo se apro- 
ximanao de seu canhdo: eles saem de suas 
posic6es em rdpidos rasantes sobre voce, exi- 
gin Jo bastante atencdo para escapar. Com o 
desenvolver do jogo, os invasores vdo dando 
mais e mats rasantes, ds vezesquatro ou cin- 
co de uma s6 vez, ficando cada vez mais di- 
ficil sobreviver ao ataque. 




Exclusivo para micros compativeis com 
o Apple que possuam disquetes, o Olympic 
Decathlon, da famosa software house ame- 
ricana Microsoft, reproduz de maneira bem 
original a mais di ficil das provas do Atle- 
tismo-.o Decatlon, na realidade um conjunto 
de dez provas, como lancamento de dardo, 
salto em altura, 100 metros rasos e outros. 
Com o simples apertar de duas ou mais te- 
clas. o jogo Simula cada uma das dez pro- 
vas seguindo estritamente as regras oltm- 
picas. Na corrida, por exemplo, o jogador 
deve ficar atento ao tiro de partida e entdo 
sair correndo, apertando as teclas 1 e 2 re- 
petidamente, uma de cada vez. com a maior 
velocidade possivel^ no salto em altura , dd-se 
a velocidade com que o jogador ird correr 
para saltar, e controla-se o momento do 
pulo e o dngulo do salto atravis das teclas 
XeESC. 




No meio de um tenebroso labirinto, voce 
4 obrigado a fugir de um faminto Tiranos- 
sauro Rex, um monstro carni'voro da pr4- 
histdria. Enquanto voce percorre o labirin- 
to em busca de uma saida, as mensagens vdo 
aparecendo no video : Rex o aguarda ; Passos 
se apro xi man do; Rex ja viu voce; FUJA. 
Rex esta a seu lado Se voc4 tiver o azar de 
topar frente a frente com ele, poderd vis- 
lumbrar a sua monuruosidade fatal, com 
tempo de escapar. Mas, ds vezes, voce sd te- 
rd tempo de sentir sua enorme dentadura 
devorando-o inapelavelmente. 

O Monstro das Trevas 4 comercializado 
pela Microsoft e4o jogo mais procurado nas 
lojas do Rio e Sdo Paulo pare a linha Sin- 
clair. 

Fotos: Monica Leme e Renato Degiovani 
Os programas foram gent ilmente cedidos pe- 
las lojas Clappy e Computique, ambas do 
Rio de Janeiro. 
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a programacAo de jogos 




Brinquedos, arcades 
e videogames 



As primeiras experiencias com computa- 
dores no campo do lazer so comecaram a ser 
feitas ao final da decada de 50, com progra- 
mas para jogar Xadrez contra computadores 
de primeira e segunda geracao. A intencao 
na"o era propriamente utilizar o computador 
para jogar Xadrez, mas sim tentar reprodu- 
zir em maquina o funcionamento da mente 
humana, a "maquina perfeita". 

O primeiro jogo mesmo so surgiu em 
1962, quando Steve Russel, um estudante 
de computacao do Massachussets Institute 
of Technology (MIT) resolveu criar um pro- 
grama de entretenimento sob a inspiracao 
futuristica das maquinas com que trabalha- 
va. Apos um dia inteiro de programacao 
com linguagens comerciais e cienti'ficas, nas- 
ceu o Spacewai (Guena Espacial), que em 
pouco tempo tornou o nome de Russel uma 
pcquena tenda entre os programadores da 
epoca. 

A iniciativa de Steve Russel foi o incenti- 
ve para outros pioneiros como Ralph Baer 
e Nolan Bushnell. Dez anos depois do Space- 
war, Baer conseguiu colocar em pratica uma 
velha id^ia que tinha para o aproveitamento 
dos televisores dome'sticos, lancando o Mag- 
navox Odissey, o primeiro aparelho de vi- 
deogame comercializado. Pouco tempo de- 
pois, Nolan Bushnell, apos testar com incn- 
vel sucesso num night-club da California 
uma maquina eletronica que simulava num 
video o jogo de Ping-Pong para duas pessoas 
jogarem entre si com joysticks, fundou a fa- 
mosa Atari, uma fabrica de videogames, 
micros pessoais e programas de jogos que lo- 
go viria a tornar-se um si'mbolo do jogo 
computadorizado e, tres anos depois, acaba- 
ria sendo incorporada pela Warner Bros. 

BRINQUEDOS E ARCADES 

Fora os jogos para micros pessoais, po- 
den'amos dividir os jogos de computacao em 
tres tipos, todos integrantes rotineiros do 
lazer de adolescentes e adultos nos pai'ses 
desenvolvidos: sSo eles os brinquedos ele- 
tronicos, os arcade games e os videogames. 

Os brinquedos eletronicos englobam va- 
rios tipos de aparelhos de diversao que fun- 
cionam com um microprocessador. Dentre 
os mais conhecidos esta o Genius (Simon, 
nos Estados Unidos), onde voce e obrigado a 
repetir uma sequencia de cores e sons dada 
pelo brinquedo, com muitas variacdes e ve- 
locidades, num estimulante cxercicio para 
os reflexos de visao e audicao. Outro jogo 
bastante popular e o Merlin, que utiliza te- 
clas, sons e cores para fazer seis diferentes 
jogos de reflexos e inteligencia. Mais recen- 
temente, a Texas Instruments lancou no 
mercado americano e europeu (e ate o fim 




Os brinquedos eletronicos da Texas 



do ano pro mete lancar no Brasil) o Speak & 
Spell e o Touch & Tell, dois pequenos com- 
putadores munidos de sintetizadores de voz 
que ensinam a crianca a soletrar e ler pala- 
vras e numeros. (Para os que viram o filme, 
um Speak & Spell foi utilizado pelo E. T. 
para a construcao daquela engenhoca que 
recebia mensagens do espaco.) 

Os arcade games sao na realidade micro- 
computadores com hardware e software de- 
senvolvidos especificamente para executar 
apenas um programa de jogo. Eles podem 
ser encontrados em qualquer casa de flipe- 
rama e sao aqueles jogos que se desenvolvem 
numa tela de vi'deo com o uso de controla- 
dores os mais diversos (joysticks, volantes, 
pedais, manches etc). O nome arcade deri- 
va da armacao de madeira onde os jogos fl- 
eam instalados, que se assemelha a uma 
arcada. 

No Brasil, uma boa parcela dos mais co- 
nhecidos jogos americanos e japoneses ja e 
conhecida dos aficcionados, como o Aste- 
roids, o Space Invaders, o Defender, o Qix, 
o Pack Man e muitos outros. Para.se ter uma 
ideia da popularidade destes jogos, e muito 
comum nos Estados Unidos haver cam- 
peonatos de Asteroids ou de Space Invaders, 
cujos resultados figuram nas paginas despor- 
tivas dos jornais matutinos. 

Os jogos arcade sao os melhores jogos de 
computacao a que o grande publico tern 
acesso, pois contam com um processador 
voltado exclusivamente para o jogo, monito- 
res de video a cores de alti'ssima resolucao 
grafica e modernas tecnologias (no monitor 
Quadrascan, utilizado pelo Asteroids, conse- 
gue-se ate" o efeito de brilho em um ponto) e 
toda a memoria necessaria para rodar o pro- 
grama, normalmente feito em linguagens ra- 
pidas como o Forth ou o Assembler. 

Mais recentemente, surgiram arcade ga- 
mes de pulso ou de bolso, os watch games. 
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Os watch games da Dismac 



acoplados a um relogio ou calculadora e 
com vi'deo piano de quartzo. A Casio ja 
tern relogios a venda com jogos e a Dismac 
comeca a lancar calculadoras/relogios de 
bolso comjoguinhosflrcflde. 

OS VIDEOGAMES 

Tab populares quanto os arcade no exte- 
rior, os videogames ainda sao uma incrivel 
novidade para a maioria dos brasileiros fora 
dos grandes centros. Um aparelho de video- 
game nada mais e do que um toca-programa, 
ou seja, um microcomputador na*o progra- 
mavel por seu usuario mas que executa pro- 
gramas armazenados em cartuchos (involu- 
aos de plistico contendo um chip de me- 
moria ROM com um programa gravado) 
compati'veis com seu sistema. Ele e ligado a 
uma TV comum (de preferencia a cores) e 
precisa de joysticks para ser usado. Seus jo- 
gos sao similares aos arcade, mas eles tern 
uma resolucao grafica bem mais grosseira e 
limitacdes impostas pelo hardware mais sim- 
ples. 

Para adquirir um videogame, o consumi- 
dor brasileiro pode escolher, a princi'pio. 
entre um importado e um nacional. Os im- 
portados (Atari, Intelivision etc) sSo acha- 
dos nos videoclubes, gracas a falhas na legis- 
lacao e na fiscalizacao aduaneira, que per- 
mitem seu facil ingresso no pai's. 

Se a opcao cair num videogame nacional, 
a escolha nao sera muito dificil. Existem 
apenas quatro modelos sendo comercializa- 
dos e mais dois sendo lancados. Ja a venda 
estao o Dactari, da Mil mar. o Dyna vision. 
da Dynacom, o Top Game, da Bit Eletroni- 
ca e o Odissey, da Philips. De todos, apenas 
este ultimo n5o e similar aos modelos Atari. 
A Dismac esta lancando o seu VJ-9000 ain- 
da este mes, enquanto a Gradiente/Polyvox 
lanca nada mais nada menos que o Atari, 
que a traditional industria dc som conse- 
guiu representar no Brasil. 

Para se ter uma ideia da rapida receptivi- 
dade que os videogames vem tendo no Bra- 
sil, primeiro via contrabando e agora por fa- 
bricantcs nacionais. basta ver alguns nume- 
ros destas industrias: a Milmar informou a 
MICRO SISTEMAS que esta produzindo 1 
mil e 500 Dactaris e 5 mil cartuchos por 
mes; a Gradiente/Polyvox espera colocar no 
mercado 130 mil Ataris ate' fevereiro de 84; 
e a Dismac tern previsSes de vender 150 mil 
VJ-9000 ate o fim deste ano! 

Os videogames nacionais estao com pre- 
90s entre Cr$ 150 e 200- mil e um cartucho 
podc custar entre Cr$ 12 e 35 mil. ■ 
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NOVO CP 300 PROLOGICA. 



Opequeno 

grande micro. 



Agora, na hora de escolher entre um 
microcomputador pessoal simples, de facil 
manejo e um sofisticado microcomputador 
profissional, voce pode ficar com os dois. 

Porque chegou o novo CP 300 Prologica. 

novo CP 300 tern prego de 
microcomputador pequeno. Mas memoria 
de microcomputador grande. 

Ele ja nasceu com 64 
«^ kbytes de memoria 




Compativel com 
programas em fita 

cassete ou em disco. 



Pode ser 
acoplado a uma 
impressora 







interna com 
possibilidade de Pen 



Pode ser ligado 
a um televisor comum 
ou a um solisticado 
terminal de video. 



quase 1 megabyte. 
E tern um teclado profissional, 
que da" ao CP 300 uma versatilidade incrfvel. 
Ele pode ser utilizado com programas de 
tita cassete, da mesma maneira que com 
programas em disco. 



64 r- 



unico na sua faixa que ja 
nasce com 64 kbytes de memoria. 



Pode ser ligado ao seu^arelho de TV, da 
mesma forma que no terminal de video 
de uma grande empresa. 
Com o CP 300 voce pode 
fazer conexoes telefonicas 
para coleta de dados, 
se utilizar 
deuma 
mpressora 

e ainda dispor de todos 
os programas existentes 
para o CP 500 ou o 
expansao de memo- te SS!£f TRS " 80 americano. E o que e melhor: 
ria externa para ate" ' voce estara apto a operar qualquer 

outro sistema de microcomputador. 

Nenhum outro microcomputador pessoal 
na sua faixa tern tantas possibilidades de 
expansao ou desempenho igual. 
CP 300 Prologica. 
Osoutrosnao mmm pRQLOGICA 

fazem que ele faZ, I ^ mkaocomputadores 

pelo prego que ■■ 

ele CObra. A» Eng "Ims Carlos 6en.n.. 1168 SP 
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AM 
Manaus- 234-1045 
•BA-Salvador - 247-8951 
•CE-Fortaieza - 226-0871 - 244-2448 
• DF-Brasiiia - 226-1523 - 225-4534 • ES-Vila Velha 
229-1387 - Vil6ria • 222-5811 •GO-Goiama - 224-7098 «MT 
CuiaM - 321-2307 • MS-Campo Grande - 383-1270 - Dourados - 421-1052 
• MG-Belo Horizonle - 227-0881 - Belim - 531 -3806 • Cel Fabnciano - 841 -3400 - Jub 
de Fora - 212-9075 - Uberlindia - 235-1099- PA-Belem - 228-0011 • Pfi-Cascavel - 23-1538 - Cun- 
Iiba - 224-5616 - 224-3422 - Fo* do Iguacu - 73-3734 - Londnna - 23-0065 • PE-Recile - 221 -0142 • Pl-Teresma 
222-0186 • Rj-Campos - 22-3714 - Rio de Janeiro - 264-5797 - 253-3395 - 252-2050* RN-Nalal - 222-3212 • RS-Caxias do 
- 221-3516 - Pelotas - 22-9918 - Porto Alegre - 22-4800 - 24-0311 - Santa Rosa - 512-1399 •RO-Porto Velho - 221-2656 «SP 
Barretos - 22-6411 - Campinas - 2-4483 - Jundiai - 434-0222 - Marilia - 33-5099 - Mogi das Cruas - 469-6640 - Piracicaba - 33-1470 - RibeirSo 
Preto - 625-5926 -635-1195- S3o Joaquim da Barra - 728-2472 - Sao Jos* dos Campos - 22-731 1 - 22-4740 - SSo Jose" do Rio Preto - 32-2842 - Santos - 33-2230 
Sorocaba - 33-7794 • SC-Biumenau - 22-6277 - Chapec6 - 22-0001 - Cnouma - 33-2604 - Flonanrjpolis - 22-9622 - Jo.nvile - 33-7520 • SE-Aracaiu - 224-1310 
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Caractensticas Tecnicas 

• Linguagem BASIC 

• 10 Kbytes de ROM. 

• 16 ou 48 Kbytes de memOria 
. RAM 

• 40 teclas e 160 funcoes. 

• Gravacao de programas em 
fita cassete comum. 

• Input e Output de dados. 

• Video: apaielhos de TV B&P 
ou colondo. 

• Funcoes especiais 
HIGHSPEED. 

• SomOpcional 

• Joystick, impressora 

Preco de lancamento: 
Cr$ 229.850.00 (16 K) 
CrS 329.850,00 (48 K) 

(Preco sujeito a alteracao) 
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